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! FACILITY: Screen Management 
{| ABSTRACT: 


This module contains the LIBSTPARSE state tables ee to parse 
string capabilities in an ascii TERMTABLE.TXT file 


i ENVIRONMENT: User mode - AST reentrant 
i AUTHOR: P. Levesque CREATION DATE: 30-Jan-1984 
i MODIFIED BY: 


| 1-901 - Original. PLL 30-Jan-1984 ' 
-002 - Add SMG$K_BEGIN -NORMAL_RENDITION. PLL 15-Mar-1984 


Eepence state tables td accept only !UL FAO Street tue, 
Allow comments on Lines not terminated by a co 


__7003 - Change implementation of control characters. PLL *§-Jul-1984 
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TPARSE tables for string capabilities 
Declarations 


XSBTTL ‘Declarations’ 

; SWITCHES: 

' 

| LINKAGES: 

NONE 

TABLE OF CONTENTS: 

FORWARD ROUTINE 
CONVERT_CONTROL, 


CONVERT ESCAPE 
EXPRESSTON_ERROR, 


NOT_S 
STORE _OPERAND, 
STORE ~ SUBSTITUTION; 


INCLUDE FILES: 


REQUIRE 'RTLIN:SMGPROLOG'; 
LIBRARY 'RTLML:SMGTPALIB'; 
LIBRARY 'RTLTPAMAC'; 


EQUATED SYMBOLS: 


LITERAL 
SINGLE_QUOTE = 1x27" 
DOUBLE~QUOTE = %x'22', 
LEFT PAREN = %X'28" 
RIGHT_PAREN = %x'29!; 

i 

: FIELDS: 

NONE 

PSECTS: 


convert * to control character 
convert $ to escape character 
signal an invalid expression error 
end an arithmetic expression 
prepare for arithmetic expression 


insert “ into a string 
insert $ into a string 
insert ! into a string 
insert ( into a ateing 
signal invalid directive 


signal an unknown capability name 


store number & operator 


store % flag in arithmetic cap 


Defines psects, macros, etc. 


Definitions and macros used 
to create TERMTABLE.EXE 
TPARSE Library of macros 
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1 | EXTERNAL REFERENCES: 

EXTERNAL ROUTINE 
OTS$SCVT_TI_L 
SMGSSBLANKS_OFF, 
SMGSS$BLANKS ON, 


COPY_CAP 
SNGSSFLUSA ARITHMETIC 
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EXTERNAL 
SMG$_ERRAT_LIN, 
SMGS$_INVDIR, 
SMG$_INVEXP, 
SMG$_MISTERNAM, 
SMG$_NOTSTRCAP, 
SMG$_SYNERR; 


EXTERNAL 
SMGSSMASK_ADR, 
SMGSSNEXT-NEGATIVE_NUMBER, 
SMGSS$CURRENT_LINE, 


SMGSSDATA_OFFSET; 
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convert ascii digits to integer 


turn off 


flag to process blanks 


turn on flag to process blank 


copy a string capability 


nks 
into TERMTABLE 


flush expression data to TERMTABLE.EXE 
flush saved token to TERMTABLE.EXE 
signal error 
get next record from TERMTABLE.TXT 
store count & ptr to token 
remember capability number 
signal syntax error 


error in Line mn at or near ‘x’ 
invalid directive 

invalid expression 

missing terminal name 

not a string capability 
syntax error 


used by TPARSE action routines 
used to set terminal number 


' current input Line - maintained 


for error messages 
offset into data buffer 
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capabilities in a terminal definition. 
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Found a name, now look for the value. = over the intervening 
equals sign. (If we get to ‘=", then we also have a capability 
name/number to remember.) 


-—o 


SERA Seem Fae bu Mme aee le MR CRG eRe Sa eran SO cago ace 7 oe ae RR, a SE ee 


Bit | 
SMGSSTRING_TABL Haat 43 tables for string capabilities 16-Sep 4 AX-11 Bliss-32 V4.0-7 Page 8 
1 "O08 SMGS$STRING_TABLES - TPARSE tables fo for string c 14-Sep 71882 9}: $602 :04 SMGRTL.SRCJSMGSTRTAB. 4 2:1 ve «3) | 
; 37 0447 1 I= | 
; i <8 1 
: 374 P 0449 1 SSTATE (EQUALS_STRIN 
: 375 P0450 1 (CEND_OF LINE) Eda STRING SMGSS$NEXT_RECORD), 
: 37 P0451 1 (‘s! STRING CAP VA VALUE $8510 TORE_CAP_MASK), | 
: 37 P 04 ; 1 (TPA$_SYMBOL> , SMG ROR) > 
: 378 P0453 1 (TPAS-ANY, , SM AGESSYNTAX TAX ER | 
3; afy 0454 1 3 
; 380 0455 1 | 
: 381 0456 1 !¢ | 
; Be 0457 1 | We have found a capability name, now we need to decipher its value. | 
; 7 beee : We found a string capability name so this better be a string value. | 
: 385 0460 1 | 
; 386 P 0461 1 SSTATE (STRING CAP_VALUE, 
: 387 P 046¢ 1 (CEND_OF _LINE)> STRING CAP_VALUE, SMGSSNEXT_RECORD), 
> 388 P 0463 1 ((STRING- CAP), BEGIN SCAN); 
: 389 P 0464 1 (TPA$S_SYMBOL, SMGSSSYNTAX_ERROR), 
: 390 P0465 1 (TPAS-ANY, , SMGSSSYNTAX_ERROR) 
: 391 0466 1 ); 
; 39¢ 0467 1 
; 39 P 0468 1 S$STATE (COMMA 
: 394 P0469 1 (*,*) TPA$ EXIT, SMGS$SBLANKS OFF). 
: 395 P0470 1 (TPAS_BLANR, COMMA, SMGSSBLANKS 0 | 
: 396 P0471 1 (CEND“OF_ LINE), TPAS EXIT ORCSSNEXT. “RECORD), 
: 397 P0472 1 (TPAS-ANY, , SMGSSSYNTAX_ERROR) 
: 398 0473 1 ); 
: 399 0474 1 
; 400 0475 1 !4 
; 401 0476 1 A string capability poquires further fers say 7 - be an embedded 
; 402 0477 1 < nghee | character, an FAO call, or arithmetic. ng Quote indicates 
; 403 0478 #1 e end of the string value, which should be RA fen TERMTABLE.EXE. 
> 404 0479 1 ie 
: 405 0480 1 
> 406 P 0481 1 $STATE (STRING CAP 
> 407 P 048¢ 1 (SINGLE E QUOTE, SINGLE _QUOTE_STRING, SMG$S$BLANKS_ON), 
> 408 P 0483 1 (DOUBLE ~ QUOTE OUBLE” QUOTE“STRING, SMG$SBLANKS_ON), 
: 409 P 0484 1 (TPAS_ANY, TPAS. FAIL 
: 410 0485 1 ); 
: 411 0486 1 
; aig P 0487 1 SSTATE (SINGLE gQore STRING 
> 41 P0488 1 ((UNDERSCORE), SINGLE QuoTe STRING) 
> 414 P0489 1 ("$", SINGLE QUOTE STRING, CONVERT_ESCAPE), | 
> 415 P 0490 1 ((CARROT), SINGLE guoTe NetRing) | 
: 416 P0491 1 ((FAO_STRING), SINGLE QUOTE STRING), | 
t 417 P 049¢ 1 ((ARITH_CAP) SINGLE_GUOT STRING) 
> 418 P0493 1 (SINGLE rauore COMMA CAP) 
> 419 P0494 1 (TPA$ BLANK, $1 INGLE cGyOTE Te STRING, ACRESSSAVE _TOKEN_STRING), | 
> 420 P0495 1 (poUBCE QUOTE, , ERROR) 
+ 421 P 0496 1 (TPAS_ARY, SINGLE sau0 TE rerainee SMGS$SAVE_TOKEN_STRING), | 
: 4 é P 0497 1 (TPAS-LAMBDA, TPAS_EXITY | 
ee 498 1 ); | 
+ 426 499 1 
> 425 P 0500 1 S$STATE (DOUBLE_QUOTE STRING, 
; 426 P0501 1 ((UNDERSCORE), DOUBLE QUOTE STRING) | 
> 427 P 030¢ 1 (*$", DOUBLE QUOTE STRING, CONVERT_ESCAPE), | 
> 628 P0503 1 ((CARROT), DOUBLE_GUOTE_SfRING), | 


9 
1 


A . ’ 


1; Maha hie TeARSE tables for string capabilities 6-sep-1984 04:46:32 AX-11 Oi regeze V4.0-74 Page 9) 
1-00 SMGSSSTRING_TABLES = TPARSE tables for string c 14-Sep-1984 7:10:04 SMGRTL.SRCJSMGSTRTAB.B352;1 (3). 
; 429 P 0504 1 ((FAO_STRING), DOUBLE_QUOTE_STRING), 
; 450 P 2 3 (CARITH_CAP) boueLE -auOTE STRING) 
> 431 P 6 1 (DOUBLE“QUOTE, COMMA, SMGSSCOPY CAP) 
: 4 g P0507 1 (TPAS BCANK, HOUBLE QUOTE STRING, SMGSSSAVE_TOKEN_STRING), 
: 4 P0908 1 (SINGCE QUOTE, , SMGSSSYNTAX ER 
; 434 P 0509 1 (TPAS_ARY, DOUBLE _QUOTE STRING, SMGS$SAVE_TOKEN_STRING) , 
; 435 P0510 1 (TPAS-LAMBDA, TPAS_EXITY 
:; 436 0511 «1 ); 
: 437 O2i¢ 1 
; 438 0515 1 !+4 
; 439 0514 1 ! Underscore is used to insert special characters into a string as 
: 440 0515 1! normal text. If this underscore is followed by a special character, 
: 461 8218 1 ! skip over it and just store the special character. 
3; «644 051 1 !- 
; 44 0518 #1 
; 446 0519 1 SSTATE (CUNDERSCORE 
> 445 P0520 1 (*_*) UNDERSCORE2), 
: 446 0501 1 (TBA$_LAMBDA, TPAS.FAIL) 
3; 447 05 ¢ 1 3 
: 448 05 1 
>; 449 P 0524 1 S$STATE (UNDERSCORE2, 
: 450 P 0599 1 ("$', TPAS_EXIT, INSERT_DOLLAR), 
s 651 P 0526 (1 ("*", TPAS_EXIT, INSERT_CARROT) 
: be P 0527 1 ("!") TPAS"EXIT, INSERT~EXCLAMATION), 
s 45 P 0528 #1 ("(", TPAS_EXIT, INSERT PARENTHESIS), 
> 454 P 0599 1 (TPAS_LAMBDA, TPA$_FAILY 
s 655 0530 1 ); 
: 456 0531 «1 
s 657 b2a§ 1 !¢ 
: 458 0533 1! If we find a *, advance to the next character and call the conversion 
; 459 0534 1! routine. The conversion routine will complain if this is a control 
: 460 0535 1 ! sequence we don't know about. 
; 461 0536 1 I= 
3; 46 0537 1 
; 46 P 0538 1 SSTATE (CARROT, 
> 464 P0539 1 (*4* CONTROL_CHAR), 
> 465 P0540 1 (TPAS_LAMBDA, TPAS$_FAIL) 
; 466 0541 1 3 
; 467 b2%¢ 1 
; 468 P 054 1 SSTATE (CONTROL_CHAR 
: 469 P0544 1 (TPAS_ANY, TPAS_EXIT, CONVERT_CONTROL) 
; 670 0545 1 3 
: 471 b248 1 
; 47 bee 7 !¢ 
; 47 548 1 ! Check for a FAO directive. Make sure it's one we understand. 
3 474 0549 1 !I- 
$475 P 0550 1 $STATE (FAO_STRING, 
: 47 P bees 1 ("!*, | SMGSS$SAVE_TOKEN_STRING), 
; 67 p 338 1 (TPAS_LAMBDA, TPAS_FAILY 
: 478 0553 (1 ); 
: 479 0554 1 
; 80 p beee 1 SSTATE (, 
; 481 P 0556 1 (‘u' SMGSSSAVE_TOKEN_STRING), 
: 4B¢ P 0597 1 (TPA$_SYMBOL, TPAS_FAIL> INVALIO DIRECTIVE), 
; 4 p 558 1 (TPASTANY, TPAS_FATL, INVALID_DIRECTIVE) 
> 484 0559 1 3 
: 4685 0560 1 
} 
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"9 | 
bles for string capabilities ep-1 AX-11 Bliss-32 V4.0-7 
NG_TABLES = TPARSE? tables for string ¢ 1228 ep 1984 93 §: 32 SMGRTL.SRCJSMGSTRTAB. 8 231 — S| 
STATE (, 
("L") TPAS_EXIT MGS$SAVE TOKEN_STRING, SMGSK_FAO_STRING, SMGSSMASK_ADR), 
(TPA$_SYMBOL, TPA IRV ALID-DIREC TIVE) ), Cae 
(TPAS ANY, TEAS "PATS TNVALI D_DIRECTIVE) 


'¢ 

i Parse arithmetic string. We can't complete arithmetic mrerese ree until 
i run-time, but here we pre-compile as much as possible. Arithmetic 

\ expressions are stored as number, op, number, op, number ... etc. 


SSTATE (ARITH_C 
(LEFT RDAREN.  ARITH. CAP? INIT_ARITH_CAP), 
(TPAS"BLANK, ARITH~CAP 
(TPAS-LAMBDA, TPAS “FAILS 


SSTATE (ARITH CAP2, 


A er ANDY, TPAS_EX ' errors handled in OPERAND 


IT 
$_LAMBDA, TPAS_FAIL) ! return w/out consuming next token 


$STA OR, 
, OPERAND, , SMGSK_ADD, SMGSSMASK ADR). 

; OPERAND, , SMGSK-SUBTRACT, SMGSSMASK ADR), 
: OPERAND , , SGSK- “MULTIPLY SRCESMASK ADR), 


( 
ga 
a 
e 
' N K"DI vi Ie. ni ngsenask “ABR 
GHT_PAREN, TeAS EXIT, P), 
AS_ANY, , “EXPRESSION. ERROR)” 


$STA 

PAS_DECIMAL, OPERATOR, STORE_OPERAND), 

SUBST ITUTIDAD © OPERATOR), 

PAS_SYMBOL, , EXPRESSION ERROR), 
AS-ANY, , EXPRESSION ERROR) 


$STA UBSTITUTION, 


T 
( 
( 
; 
T 
( 
( 
( 
( 
( 
( 
); 
T 
( 
( 
( 
( 
); 
! 
r “LAMBDA, TPAS_FAIL) 


E 
( 
T 
E 
A] 
i] 
i] 
a 
R 
T 
&, oS bec ink 
( 
T 
TPA 
E 
a 
T 


estat % should be followed by a number 
CTPA DECIMAL, TPAS_EXIT, STORE_SUBSTITUTION), 
(TPAS-ANY, , EXPRESSION_ERROR) 


| 
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e808 CONVERT_CONTROL = Convert apo control characte 1 =300 71383 93:96:32 SMGRTL. ReismestRtAB B92; ° (4) 
; 8 $18 1 ZSBTTL "CONVERT_CONTROL = Convert * to control character’ 
: 9 615 1 ROUTINE CONVERT_CONTROL = 
; 540 614 1 
: 541 615 1 !44 
; : bei8 ! FUNCTIONAL DESCRIPTION: | 
: 5446 Oet8 1} Stores a control character in the current capability string in 
; ete Bey? } TERMTABLE.EXE. 
; 229 0621 1 ! CALLING SEQUENCE: 
; 548 06 § 1! 
3 208 Og ? ! status = CONVERT_CONTROL () 
s 39) 625 1 ! FORMAL PARAMETERS: 
: 226 06 § 1! 
; e2 06 1! NONE 
; 554 0628 1! 
; 22? 0629 1 ! IMPLICIT INPUTS: 
; 556 0630 1! : 
:. tor 0631 1! AP Points to TPARSE parameter block 
5 oe et 1! 
; 559 0635 1 =! IMPLICIT OUTPUTS: 
; 560 0634 1! 
; 561 sth 1! NONE 
3 206 06 $ 1! 
3; 3 0637 1 =! COMPLETION STATUS: 
; 564 0638 1! 
3 365 0639 1! SS$_NORMAL 
; 566 0640 1! 
: 567 0641 1 ! SIDE EFFECTS: 
; 568 Bong ie 
; 569 0643 1 !-- 
; 570 0644 1 
; or 0645 BEGIN 
; 278 0646 BUILTIN 
‘pete 0647 CALLG, 
; 574 0648 AP; 
3 375 0649 MAP 
; 576 0650 AP : REF BLOCK C,BYTE); 
. Sie 0651 BIND 
3 378 065¢ cocatarePTRS = .AP CPARAM_L_CUR_TERM_DEF] : VECTOR C,WORD); 
; Ht 0654 CONTROL _CHAR : BYTE, ' char following ctrl . 
; 581 8822 MOVE_CHAR : BYTE; ! code to place in cap string 
; abe $28 
3 38 065 '¢ 
; «584 0658 ! The NAME capability should have preceeded this. Complain if it 
3 HH 0659 ! didn't. 
; 386 660 !- 
; ae 661 
; 88 $66 IF CAP_PTRS EQL 0 
; 589 TH 
; 590 664 SIGNAL_STOP (SMG$_MISTERNAM) ; 
; 591 665 
: 4 66 te 
; 59 066 ' Control must be followed by a valid character in order to constitute 
3: 594 0668 ! a control code. The character can be shifted or not (lower or upper 
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for string capabilities 1b-se 1984 7:22:35 AX-11 Bliss-32 V 
OL - tonvert apo control characte 14- 300-1 Oba 04:98:32 


ce we have already seen a control character, we can translate on 
second character in the control string. 


CONTROL _CHAR = .(.AP CTPASL_TOKENPTR]) <0,8>; 


A control character is in the range 00 - 1F (hex) but is expressed as 
Nudes SF (hex). Strip off extra bit to get the control character. 


MOVE_CKAR = .CONTROL_CHAR AND NOT (%X'4O"); 


'¢ 

i We now have the oreo 9 which must be moved into the Mg ebb string. 

! This may not be the first byte of the — - check for saved characters 
n 


which have not been copied yet, and append the control code. 


CALLG (.AP, SMGSSFLUSH_SAVED_BUFFER); ! copy saved string 

AP CPARAM_L_SAVED_TOKENCNT] = 1; 

AP CPARAM_L~SAVED-TOKENSTR] = MOVE_CHAR; ! control char is now ‘saved’ 
CALLG (.AP, SMGSSFLUSH_SAVED_BUFFER); ! append control char 

RETURN (SS$_NORMAL); 

END; ! end of routine CONVERT_CONTROL 


4.0-7 
SMGRTL.SRC SMGSTRIAB. a 231 


-TITLE SMGSSTRING_TABLES TPARSE tables for string capa 
bilities 


.IDENT \1-003\ 
.PSECT _LIBSKEY1$,NOWRT, 
00000 ; TPASKEYSTO 


U. -BLK 0 
44 4€ 45 00000 :TBABKEYST 
: ASCII \END\ 
FF 00003 BYTE =! 
00004 ; TPASKEYSTO 0 


U.34: LK 
4E 41 45 4C 4F 4F 42 00004  TPASKEYST 
FF 0.36: ASCII triad 


00008 “BYTE 
0000C ; TRASKEYSTO 


v. .B 0 
43 49 52 45 4D 55 4€ 0000C ;TP ASKEYST 
U.41: ASCII \NUMERIC\ 
FF 0013 1 


-BY 
0014 ; TPASKEYSTO 
U.44:  .BLKB 0 
47 4E 49 52 54 53 00014 ; TPASKEYST 
~-46:  . ASCII \STRING\ 
QOO1A -BYTE 1 


ce 
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45 54 4) 


4F 4D SF 


4F 4D SF 


57 41 52 


45 52 SF 


45 


oe 


45 


54 


4h 


4C 


53 


52 


48 


54 


52 


5F 


41 


52 


45 


4E 


44 


45 


45 


45 


4D 


45 


54 


49 


4C 


4C 


53 


4E 


52 


56 


4C 


4C 


4F 


45 


4E 


49 


52 


4F 


45 


45 52 49 


41 SF 4E 
52 


42 SF 4E 


42 SF 4€E 


44 SF 4E 


49 SF 4E 


4C SF 4€ 


41 48 43 


4E SF 4E 
4E 4F 49 


52 SF 4E 


55 51 


45 4D 


49 47 
41 48 


49 47 


49 47 


49 47 


49 47 


49 47 


5F 47 


49 47 
54 49 


49 47 
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45 


a 


45 


45 
45 


45 
45 


45 
4E 


45 
4a 


45 


K 9 


Q001B ; TPASKEYSTO 


U.49:  , BLKB 
00018 siPASKe VET 


1) be 
S058 eased 


0. 
00023 ; :iphéxevst 
U.5?7: ASCII 


68 tH “BYT 
0028 ; TPASKEYFILL 
U.65: .BYT 
00029 ; TPASKEYSTO 
0.64: | .BLK 

00029 ; TPASKEYST 
0.66: ASCII 

STPASKEYETO 

$ BLK 

; TPASKEYST 

73: +. ASCII 


oO 
cc 
. 


-BYTE 
; TPASKEYSTO 
78: K 


L 
; TPASKEYST 
U.80: .ASCII 


-BYTE 
; TPASKEYSTO 


: TPASKEYST 
U.87:  .ASCII 


A ae: 


Fs 
“Sc: 
oo 


-BYTE 
; TPASKEYSTO 


LK 
 TPASKEYST 
U.94: .ASCII 


——_ 


00078 -BYTE 
00079 ; TPASKEYSTO 

v. -BLK 
00079 : TPASKEYST 

U.101: .ASCII 

90088 - 
00090 
00091 
00091 


-BYTE 
; TPASKEYSTO 
; fPASKEYST 
U.108: .ASCII 
OOA 
QOA -BYTE 
OOA8 ;TPA KEYSTO 
0.11 -BLK 
QOOAS ; TPA KEVST 
0 : rit t 
00085 -BYTE 


ea$ep=1986 15:40:06 


16 
to control characte 14-Se 


AX-11 Bliss-32 V4 cas 
SMGRTL.SRCJSMGSTRTAB.B52;1 
0 

WIEQUIREN 


0 
bec 


“1 

0 
\BEGIN_ALTERNATE_CHAR\ 
“1 

0 

\BEGIN_BLINK\ 


0 
\BEGIN_BOLD\ 


0 

\BEGIN_DELETE_MODE\ 

=] 

0 

\BEGIN_INSERT_MODE\ 

al 

0 
\BEGIN_LINE_DRAWING_CHAR\ 
-1 

0 

\BEGIN_NORMAL _RENDITION\ 
-1 

0 

\GEGIN_REVERSE\ 


4§ 


4t 
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52 4F 43 


52 


4E 49 4C 


4E 4F 49 


49 44 45 


53 


41 


5F 


54 


45 


bY] 


52. 45 44 GE 55 SF 


48 


4E 


54 


54 


49 


43 


48 


43 


52 


57 


46 


58 


53 


45 


47 


5F 


42 


49 


41 


4F 


45 


45 


4F 


52 


49 


54 


41 


48 


48 


bh 


4C 


4E 


50 


50 


52 


5F 


54 


43 


5F 


SF 


5F 


5F 


54 


5F 
45 


5F 


4D 


SF 


52 


52 


52 


52 


52 


52 
4E 


52 


4E 


4F 


52 


52 


53 


4F 


4F 


4F 


4F 


4F 


4F 
49 


4F 


49 


54 


41 


47 


53 


53 


53 


53 


47 


oh 


45 


SF 


4F 


52 


52 


52 


52 


45 


52 
5F 
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45 


4F 


4C 


52 


52 


55 


55 


55 


55 


52 


55 
47 


55 


00086 ; 
00086 


0 cs” 
B58 


000C7 


00004 
00005 


00005 


QOODE 
OO00DF 


OO00DF 


QO0E9 
QOOEA 


OOOEA 


QO0F4 
000F5 


000F5 


00100 
00101 


00101 


0010C 
00100 


A*tarerey = 
 FPASKEYE? 
U.122: .ASCII 
BYTE 
p TRASKEYS 10 
U.127: .BLKB 
3; TPASKEYST 
U.129: .ASCII 
BYTE 
3 TPASKEYSTO 
U.134: .BLKB 
; TPASKEYST 
U.136: .ASCII 
BYTE 
3 TPASKEYSTO 
U.141:  BLKB 
3; TPASKEYST 
U.143: ASCII 
YTE 
3 TPASKEYSTO 
U.148: .BLKB 
3; TPASKEYST 
U.150: .ASCII 
BYTE 
; TPASKEYSTO 
U.155: .BLKB 
3; TPASKEYST 
U.157: .ASCII 
BYTE 
3; TPASKEYSTO 
U.162: .BLKB 
3; TPASKEYST 
U.164: .ASCII 
BYTE 
; TPASKEYSTO 
U.169: .BLKB 
3 TPASKEYST 
U.171: ASCII 
STPASKEYETO 
U.176: .BLK 
; TPASKEYST 
U.178: .ASCII 
BYTE 
; TPASKEYSTO 
U.183: .BLKB 
; TPASKEYST 
U.185: .ASCII 
YTE 
sTeasxe vito 
190: .BLK 
UEPASKEYST 


AX-11 BLi fog: 32 V 
C shes 


SMGRTL.SR 
0 
\BEGIN_UNDERSCORE\ 
-1 
0 


\OTTOM_T_CHAR\ 


0 
\GLEAR_TAB\ 


0 
\CR_GRAPHIC\ 


0 
\GROSS_CHAR\ 


0 
\CURSOR_DOWN\ 


0 
b: ‘aaeeeate cei 


0 

\CURSOR_NEXT_LINE\ 

-1 

0 
\CURSOR_POSITION_REPORT\ 
“1 

0 
\CURSOR_PRECEEDING_LINE\ 
-1 


0 
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. U.192: ASCII \CURSOR_RIGHT\ 
80189 ; TPASKEYSTO 


219 LK 
50 55 SF 52 4F 53 52 55 43 00159 “fpAsieyst 
0.199: ASCII \CURSOR_UP\ 


FF 63 $e. .BY 
oS reget 
SE 45 45 52 43 53 SF 4B 52 41 44 00163 ; TPASKEYST 


0.206: .ASC!I \DARK_SCREEN\ 
FF 0016 “BYTE = =1 
erent 
52 41 48 43 SF 45 54 45 4C 45 44 OO16F ; TPASKEYST 
U.213: ASCII \DELETE_CHAR\ 
FF QO17A “BYTE =1 
00178 ZIBASKEYSTO 
45 4E 49 4C SF 45 54 45 4C 45 44 0017B ; TPASKEYST 
0.220: ASCII \DELETE_LINE\ 
FF 00186 “BYTE =1 
1 mls 
54 55 42 49 52 54 54 41 SF 45 43 49 56 45 44 00187 ; TPASKEYST 
0.227: .ASCII \DEVICE_ATTRIBUTES\ 
53 45 001% 
FF 00198 .BYTE -1 
00199 gIBASKEYSTO © 
54 GF 42 SF 48 47 49 48 SF 45 4C 42 55 4F 44 00199 ; TPASKEYST 
0.234: ASCII \DOUBLE_HIGH_BOTTOM\ 
4D 4F 54 OO1A8 
FF OO1AB -1 


OO1AC ; 
U.239: .BLKB 0 

50 4F 54 SF 48 47 49 48 SF 45 4C 42 55 4F 44 OO1AC ; TPASKEYST 

FF 001BB U.2hls .ASC]T \QOUBLE_WIGH_TOP\ 


-BYTE 
OO1BC ; TPASKEYSTO 
U.246: .BLKB 0 
45 44 49 57 SF 45 4C 42 55 4F 44 OO01BC ; TPASKEYST 
U.248: .ASCII NPL _WIPE 


FF 001C7 . 
01C8 ; TPASKEYSTO 
U.253: .BLKB 0 
45 54 41 43 49 4C 50 55 44 O001C8 ; TPASKEYST 
U.255: .ASCII \DUPLICATE\ 
FF 00101 . | 
0102 ; TPASKEYSTO 
U.260: .BLKB 0 
435 SF 45 54 41 4E 52 45 54 4C 41 SF 44 4E 45 001D2 ; TPASKEYST 
.262:  .ASCII \END_ALTERNATE_CHAR\ 
52 41 48 oie) 
FF 1E4 BYTE -1 
O1ES ;T 


0 


SPGSS TRING TABL 


4B 46 49 4C 42 SF 
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44 4E 


45 
FF 


45 
FF 


45 
FF 


45 
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to control characte 14- ~Sep-1984 9}: #6: 3 SMGRTL.SR RCISMGSTRIAB.B 2;1 


OO1ES ; TPASKEYST 
0.269: ASCII 


pO TEE .BYTE 
1EF ; TPASKEYSTO 
U.274: .BLKB 
OO1EF ; TPASKEYST 
U.276: .ASCII 
O1F7 BYTE 
O1F8 ; TPASKEYSTO 
U.281: .BLKB 
OO1F8 ; TPASKEYST 
U.283: .ASCII 
oe0? BYTE 
0208 ; TPASKEYSTO 
U.288: .BLKB 
00208 ; TPASKEYST 
U.290: .ASCII 
00217 BYTE 
00218 ; TPASKEYSTO 
U.295: .BLKB 
00218 ; TPASKEYST 
U.297: .ASCII 
0022 
b855 YTE 
0022E s TPASKEYS10 
U.302: .BLK 
0022E ; TPASKEYST 
U.304: 4 fs 
00239 BYTE 
0023A ; TPASKEYSTO 
U.309: .BLKB 
O023A ; TPASKEYST 
U.311: .ASCII 
00248 «BYTE 
00249 ; TPASKEYSTO 
U.316: .BLKB 
00249 ; TPASKEYST 
U.318: .ASCII 
00258 
00250 BYTE 
0025E ; TPASKEYSTO 
U.323: .BLKB 
0025E ; TPASKEYST 
U.325: .ASCII 
026D 
bs8 YTE 
00270 ; TPASKEYSTO 
U.330: LKB 
90270 A TRASKEYST 
mF U.332: ASCII 
aaa 
00284 i Saree BL 
U 337: .BLKB 
00284 ; TPASKEYST 
U.339: .ASCII 


\END_BLINK\ 


0 
\END_BOLD\ 


0 
\END DELETE _MODE\ 


0 
MpMO INSERT ODEN 


0 
\END_LINE_DRAWING_CHAR\ 
-1 

0 

\END_REVERSE\ 


0 
MAP OERSEORE 


0 
\ERASE_TO_END_DISPLAY\ 
-1 

0 

\ERASE_TO_END_LINE\ 
-1 

0 
\ERASE_WHOLE_DISPLAY\ 
-1 

0 

\ERASE_WHOLE _LINE\ 


10 
SMGSSTRING_TABL TPARSE tables for string capabilities 18. Sep-1984 AX-11 Bliss-32 V4.0-74 
1-00 CONVERT_CONTROL = Convert “to control characte 14- =3e0= 138 93: 6; ‘i SMGRTL.SR RCISMESTR ihe /BS2:1 
FF 94 BYTE 1 
a0285 > geapee” saLKe 0 
43 49 48 50 41 52 47 SF 46 46 00295 ;TPASKEYST 
U.346: .ASCII \FF_GRAPHIC\ 
FF 94 BYTE -1 
O2A0 ; TPASKEYSTO 
U.351: .BLKB 0 
45 4D 4F 48 . 002A0 A TRASKEYST 
U.353: .ASCII \HOME\ 
FF OO eA BYTE -1 
oi ae 
52 41 42 SF 4C 41 54 4E GF SA 49 52 4F 48 OO2AS ; TPASKEYST 
0.360: ASCII \HORIZONTAL_BAR\ 
FF Op ee? BYTE -1 
cen rae 
43 49 48 50 41 52 47 SF 54 48 002B4 ;TPASKEYST 
U.367: .ASCII \HT_GRAPHIC\ 
FF OO ge BYTE -1 
O2BF ; TPASKEYSTO 
U.372: .BLKB 0 
58 45 44 4E 49 OO2BF ; TPASKEYST 
U.374: ASCII \INDEX\ 
FF poets .BYT “4 
002C5 ; TPASKEYSTO 
U.379: .BLKB 0 
47 4E 49 52 54 53 SF 54 49 GE 49 002C5 ; TPASKEYST 
U.381: .ASCII \INIT_STRING\ 
FF 00200 .BYTE <1 
00201 LS eee 0 
52 41 48 43 SF 54 52 45 53 4E 49 00201 ; TPASKEYST 
0.388: .ASCII \INSERT_CHAR\ 
FF 002DC BYTE -1 
002DD ; TPASKEYSTO 
U.393: .BLKB 0 
45 GE 49 4C SF 54 52 45 53 4E 49 Q02DD ; TPASKEYST 
U.395: ASCII \INSERT_LINE\ 
FF Q02E8 BYTE -1 
OO2ZE9 ; TPASKEYSTO 
-400: .BLKB 0 
44 41 50 SF 54 52 45 53 4E 49 OO2E9 ;TPA KEYST 
i 0.402: ASCII \INSERT_PAD\ 
Oeste s TPASKEYSTO 
0.407: .BLKB 0 
30 SF 59 45 4B OO2F4 ; TPASKEYST 
U.409: “ASCII \KEY_O\ 
FF OOere F9 YTE -=1 
FA s TPASKEYSTO 
0.414: LK 0 
31 SF 59 45 4B OO2FA ; TPASKEYST 
“ 0.416: ASCII \KEY_1\ 


80300 : 


YTE 
STPASKEYS10 


SMGSSTRING_TABL TPARSE tables for 
1-00 CON 


NVERT_CONTROL = a I 


32 

33 

34 

35 

36 

37 

38 

39 

45 43 41 50 53 4B 43 41 42 
41 40 4D 4F 43 

57 4F 


52 52 41 SF 4E 57 4F 44 


5F 


5F 


SF 


5F 


SF 


SF 


5F 


SF 


SF 


SF 


SF 


59 


59 


59 


59 


59 


59 


59 


59 


59 


59 


59 


tring cgpabilities a 01:27:55 


45 


45 


45 


45 


45 


45 


e) 


45 


45 


45 


45 


4B 
FF 


4B 
FF 


4B 
FF 


4B 
FF 


48 
FF 


4B 
FF 


4B 
FF 


4B 
FF 


4B 
FF 


4B 
FF 


4B 
FF 


4B 


00300 


gongs 


00306 


00308 
0030C 


0030¢ 


00311 
00312 


00312 


00317 
00318 ; 


U, 
00318 ; 


0031D 
OO31E 


OO31E 


00323 
00324 


00324 


00329 
0032A 


0032A 
OO R¢ 
003350 
00330 


0033 


0033€ 


00347 
00348 


00348 


00839 


00357 


421: .BLKB 
UPA KEYST 
423: .ASCII 


.B 
gTRASKEYSTO, 


; TPA KEVsTO 
U.44 LK 
S TPASKEYST 
0.444: .ASCII 


.BY 
; TPASKEYSTO 


ce- Ce. ce- Ce. ce- Ce. 
2 —_ _—-e <4 _—-s —4 oe 
oe FE oe x x o- Fee 
m mm m 
<< 
* Pe Wee 
or40—-4 
So 


ce- ce. 
~7 ce «<2 — _ 
Suf v0 SVS Ve fv ve SVS PF US 
oe FE oe 
m 


ce. 
nx 
m 
<< 
wn wee 
=0 40 
Oo 


te 

SALAM OVNSF WKOHF VPWSF DWHeow 
eC 
Fad 
@ 


Oror NPnrere NOVY CPO PF VIP UP 
oe Fe ee 
mn 


ce. 
e 


8 

; TPASKEYSTO 

U.491: K 
TPA KEYST 

493: “peed 


YTE 
;Tpageevst0 
; TPASKEYST 


AX-11 Blis 
SMGRTL.SR RC} 


0 
\KEY_2\ 


Oo 


\KEY_3\ 


0 
\KEY_4\ 


0 
\KEY_5\ 


0 
\KEY_6\ 


0 
\KEY_7\ 


0 
\KEY.8\ 


0 
\KEY_9\ 


0 
\KEY_BACKSPACE\ 


0 
\KEY_COMMA\ 


0 
\KEY_DOWN_ARROW\ 


0 
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shgs TRING_TABL TPARSE table 
1-00 CONVERT _CONT 


52 45 54 


32 


33 


34 


35 


36 


4E 


31 


32 


33 


34 


35 


45 


45 


45 


45 


46 


46 


46 


46 


46 


to control characte 


SF 


5F 


5F 


SF 


SF 


SF 


5F 


SF 


SF 


5F 


s for string capabilities 
ROL - Convert * 


59 


59 


59 


59 


59 


59 


59 


59 


59 


59 


45 


45 


45 


45 


45 


45 


45 


45 


45 


45 


4B 


—— 
foo 

e te 

. now 

o vv 

o ee 

oe — 

ee pare 


bO88e 1 
0035€ ;T 
$0868 :1 
00365 ;T 


00368 
0036C 


0036C 
poate 
00373 ; 


00379 
QO37A ; 


0037A 


00380 
00381 


00381 


0038A 
00388 


00388 


00391 
00392 


00392 


00398 
00399 ; 


—_ 
x 
m 
~< 
* Ge -« Ww 
40> 
oC 


ce- Ce. 


Cee 
o —e 


ce- Ce. ce-ce- ce- Ce. 
o—e —t © te te te 
oo hee FE te FE 
mm mm 
~< 
We Gee 
o-@w 
Oo 


x 
m 
~< 
wm 


So 
oO 
Ww 
- 
o 
-s 
“HK 
m 
< 
We 


say 1 


OO3A7 ; 
OO3AD 


NPnNSe NPOP OFPOP VOPViP LPS LPL PrP WPWP KPKRYF WPF —>F—PF CPFOPYF 
eS OVee WRF ASR OM~ Se vecor VPN DWHORM —HMOM FOTUM WOW 
mm 


ce “cee ore, 
8 — 4 a . — 
wuovurTo oe nun wound wowvod wows wu wows wows wow wouwoD Uw «8A oO 


46ib¢ 


\KEY.E1\ 


0 
\KEY_E2\ 


0 
\KEY_E3\ 


0 
\KEY_E4\ 


0 
\KEY_E5\ 


0 
\KEY_E6\ 


0 


AX=1i 


\KEY_ENTER\ 


0 
\KEY_F1\ 


0 
\KEY_F2\ 


0 
\KEY_F3\ 


0 
\KEY_F4\ 


0 
\KEY_F5\ 


Bliss-32 V4.0-7 1 
SMGRTLS SRC SMGSTRTAB. : 2:1 oh 


ahaa tr hee tables for string capabilities 


ONVERT_CONTROL = Convert “ 


30 


31 


32 


33 


34 


35 


36 


36 46 «SF 


37 46 «SF 


38 46 SF 


39 46 5F 


31 46 SF 


31 46 SF 


31 46 5SF 


31 46 SF 


31 46 5F 


31 46 5F 


31 46 SF 


59 45 


59 45 


59 45 


59 45 


59 45 


59 45 


59 45 


59 45 


59 45 


59 45 


59 45 


4B 
FF 


4B 
FF 


4B 
FF 


4B 
FF 


4B 
FF 


4B 
FF 


4B 
FF 


4B 
FF 


4B 
FF 


4B 
FF 


4B 
FF 


OO3AE 
OO3AE 
00385 
00385 
Bosse 
0038C 


003¢ 
003¢ 


003¢3 


0039 
QO3CA 


QO3CA 


00301 
00302 


00302 


00309 
OO3SDA 


003DA 


003E1 
003E2 


003E2 


Q03E9 
OOSEA 


OO3EA 


003F1 
003F2 


003F2 


003F9 
OOSFA 


OOSFA 


0401 
0402 


1fodeo-t9Re 01:23:35 


to control characte 12: 


; TPASKEYSTO 
U.58 $ . LKB 
; TPASKEYST 
U.584: .ASCII 
BYTE 
3 TPASKEYSTO 
U.589: .BLKB 
; TPASKEYST 
U.591: ASCII 
BYTE 
3 TPASKEYSTO 
U.596: .BLKB 
; TPASKEYST 
U.598: .ASCII 
BYTE 
3 TPASKEYSTO 
U.603: .BLKB 
3; TPASKEYST 
U.605: .ASCII 
BYTE 
3; TPASKEYSTO 
U.610: .BLKB 
3; TPASKEYST 
U.612: .ASCII 
BYTE 
3 TPASKEYSTO 
U.617: .BLKB 
3; TPASKEYST 
U.619: .ASCII 
BYTE 
3; TPASKEYSTO 
U.624: .BLKB 
3; TPASKEYST 
U.626: .ASCII 
BYTE 
3 TPASKEYSTO 
U.631: .BLKB 
3; TPASKEYST 
U.633: .ASCII 
BYTE 
; TPASKEYSTO 
U.638: .BLKB 
; TPASKEYST 
U.640: .ASCII 
BYTE 
3; TPASKEYSTO 
U.645: .BLKB 
; TPASKEY 
U.647: ASCII 
BYTE 
; TPASKEYSTO 
tate -BLKB 
; TPASKEYST 
U.654: ASCII 
BYTE 
3; TPASKEYSTO 
0.659: .BLKB 


0 
WEV PON 


0 
\KEY_F7\ 


0 
\KEY_F8\ 


0 
\KEY_F9\ 


0 
\KEY_F10\ 


0 
\KEY_F11\ 


0 
\KEY_F12\ 


0 
\KEY_F13\ 


0 
\KEY_F14\ 


0 
\KEY_F15\ 


0 
\KEY_F16\ 


0 
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Page 20 
. (4) 


57 4F 


57 4F 


52 52 41 


SMGSSTRING_TABL TPARSE tables 
1-00 CON 


52 52 41 


37 


38 


39 


30 


SF 54 46 


53 55 4E 


44 4F 49 52 


5F 


31 


32 


33 


34 


54 48 47 


31 


31 


31 


32 


45 


49 


45 


46 


46 


46 


46 


49 


46 


46 


46 


46 


4C 


4D 


50 


50 


50 


50 


50 


52 


to contro 


SF 


5F 


5F 


5F 


SF 


5F 


5F 


5F 


5F 


for string capabilities 
VERT_CONT ROL - Convert * 


59 


59 


59 


59 


59 


59 


59 


59 


59 


59 


59 


45 


45 


45 


45 


45 


45 


45 


45 


45 


45 


45 


45 


4B 
FF 


4B 
FF 


4B 
FF 


4B 
FF 


4B 
FF 


4B 
FF 


4B 
FF 


4B 
FF 


4B 
FF 


4B 
FF 


4B 
FF 


4B 


00402 


00008 


0040A 
0411 


0412 ; 


00412 


00419 
OO41A 


O041A 


00421 
00422 


00422 


00430 
00431 


00431 


Q043A 
00438 ; 


00438 


00445 
00446 


00446 


00440 
0044E 


0044E 


00455 
00456 


00456 


045) 
045E 


0045E 


0465 
0466 


00466 


F 1 


i characte 12 Sep 1964 94: 6: a2 


; TPASKEYST 
0.661: “ASGl! 


YTE 
; TPASKEYSTO 


-BY 
; TPASKEYSTO 


. : ,OLKk 
; TPASKEYST 
U.696: .ASCII 


-BYT 
Wo rade ¥y 


LK 
; TPASKEYST 
U.703: peti! 


STPASKEYSTO. 
U.708: 


ape 
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SMGRTL.SRCJSMGSTRTAB.B52; 1 


\KEY_FI7\ 


o 


\KEY_F18\ 


0 
\KEY_F19\ 


0 
\KEY_F20\ 


0 
\KEY_LEFT ARROW 


0 
\KEY_MINUS\ 


0 
\KEY_PERIOD\ 


0 
\KEY_PFI\ 


0 
\KEY_PF2\ 


0 
\KEY_PF3\ 


0 
\KEY_PF4\ 


0 
\KEY_RIGHT_ARROW\ 
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57 4F 


52.52 41 


31 


32 


33 


34 


35 


36 


37 


38 


39 


30 (31 


SF 


46 


46 


46 


46 


46 


46 


46 


46 


46 


46 


50 55 SF 


SF 4C 45 


SF 4C 45 


SF 4C 45 


SF 4C 45 


SF 4C 45 


SF 4C 45 


5F 4C 45 


59 


42 


42 


42 


42 


42 


42 


42 


4e 


Frgng TRING. TABL heat tables for string capabilities 
CONVERT_CONTROL = Convert * 


P) 


41 


41 


41 


41 


41 


41 


41 


41 


41 


41 


FF 


48 
FF 


at 
FF 


4c 
FF 


4c 
FF 


4C 
FF 


4c 
FF 


4C 
FF 


4C 
FF 


4C 
FF 


4C 
FF 


4C 
FF 


to control characte 1f3e ety 7 94: 6; 32 


498 54 .BYTE 

476 ;TPA KEYSTO 
U.74 ~BLK 

00476 ; sipAgievé} 


ASCII 
ones BYTE 
Mit ype Se 
U.750: .BLKB 
00483 AS ST 
U.752: .ASCII 
00488 BYTE 
0048C pTDASKEYS TO 
U.757: .BLKB 
0048C ; TPASKEYST 
U.759: .ASCII 
00494 BYTE 
00495 ; TPASKEYSTO 
U.764: .BLKB 
00495 ; TPASKEYST 
U.766: .ASCII 
00490 BYTE 
0049E ; TPASKEYSTO 
U.771: .BLKB 
0049E ; TPASKEYS 
U.773: .ASCII 
004A6 BYTE 
O04A7 ; TPASKEYSTO 
U.778: .BLKB 
OO4A7 ; TPASKEYST 
U.780: .ASCII 
OO4AF BYTE 
004B0 ; TPASKEYSTO 
U.785: .BLKB 
00480 ; TPASKEYST 
. 787: “Aaeit 


00488 BY 
004B9 ; TPASKEYSTO 
U.792: .BLK 
00489 ; TPASKEYST 
0.794: “ASCH 
004C1 YTE 
004C2 : TPASKEYST0 
004C2 : TPASKEYST 


QO4CA 
004(B ; 


004CB Bast 
8 403 . 
404 p TEgee rete 
813: 
00404 ;1P 


00400 


. E 
QO4DE ; TPASKEYSTO 


SMGRTL. 
“1 
\KEY_UP_ARROW\ 


0 
\PABEL_F1\ 


0 
ML ABEL Fe 


0 
\LABEL_F3\ 


0 
\LABEL_F4\ 


0 
\LABEL_F5\ 


0 
\PABEL_F6\ 


0 
\PABEL_F?\ 


0 
\PABEL_F8\ 


0 
\LABEL_F9\ 


0 
\LABEL_F10\ 


5 AX-11 ge PY les 
SRCJSMGSTRTAB.B52;1 


ShG5g TRING. TABL tone 


31 


32 


33 


34 


35 


36 


37 


38 


39 


30 


52 41 48 


43 49 


31 


31 


31 


31 


31 


31 


31 


31 


32 


43 


48 


46 


46 


46 


46 


46 


46 


46 


46 


46 


46 


5F 


50 


SF 


SF 


SF 


SF 


5F 


SF 


SF 


SF 


SF 


5F 


54 


41 


4C 


4C 


4C 


4C 


4C 


4C 


4C 


4C 


16 


4C 


SF 


52 


to control characte 


45 


45 


45 


45 


45 


45 


45 


45 


45 


45 


54 


af 


42 


42 


42 


62 


42 


42 


42 


42 


42 


42 


46 


5F 


SE tables for string capabilities 
NVERT_CONTROL = Convert * 


41 


41 


41 


41 


41 


41 


41 


41 


41 


46 


4C 
FF 


4C 
FF 


4C 
FF 


4C 
FF 


4C 
FF 


4C 
FF 


4C 
FF 


4C 
FF 


4C 
FF 


4C 
FF 


4C 
FF 


4C 


H 10 
16-Sep-1984 H 
12-8087} Hn 94:46 ba 

U.820: .BLKB 
004DE pTpagKevsl 
U.822: .ASCII 
04E7 BYTE 
O4E8 ; TPASKEYSTO 
U.827: .BLKB 
004E8 pT ODSKEys! 
U.829: .ASCII 
8 4F 1 BYTE 
4F2 ; TPASKEYSTO 
U.834: .BLKB 
OO4F2 ; TPASKEYST 
U.836: .ASCII 
004FB BYTE 
OO4FC ; TPASKEYSTO 
U.841: .BLKB 
OO4FC Wy raahbe 
U.843: .ASCII 
00505 BYTE 
00506 ; TPASKEYSTO 
U.848: .BLKB 
00506 ; TPASKEYST 
U.850: .ASCII 
0050F BYTE 
00510 ; TPASKEYSTO 
U.855: .BLKB 
00510 ; TPASKEYST 


U.857: .ASCII 
9 -BYTE 
OOS1A ; TPASKEYSTO 
.862: K 
O0S1A ; TPASKEYST 
U.864: Tt) 


00524  TPASKEYSTO 
U.869: LK 

00524 ; TPASKEYST 

U.871: a) 


00520 BY 
OOS2E ; TPASKEYSTO 
U.876: .BLK 

0052E  TPASKEYST 

U.878: .ASCII 

05 "by .BYT 
0538 ; TRASKEYSTO 
0.88 BLK 

00538 ; TPASKEYST 


U.885: .ASCII 
0054 Y 
00842 jTBASKEYSTO 
00542 MAS ree 
0.892: “ASE 
bosee aTeasnerst0 
0054E STPASKEYST 
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0 
\LABEL_F11\ 


0 
MABEL FTeN 


0 
\LABEL_F13\ 


0 
\PABEL_F14\ 


0 
\LABEL_F15\ 


0 
\LABEL_F16\ 


0 
\LABEL_F17\ 


0 
\LABEL_F18\ 


0 
MABEL FTN 


0 
\LABEL_F20\ 


0 
\LEFT_T_CHAR\ 


0 


4E 


4—E 52 4F 43 


52 4F 43 SF 


52 


SF 52 4F 53 


52 4F 53 


58 45 


52 


FPS STRING, TABL T 


45 


5F 


54 


41 


52 


52 


Aly 


41 


45 


O4 


48 


48 


55 


4E 


48 


52 43 53 SF 


46 


47 


43 


43 


43 


49 


43 


45 


49 


SF 


52 


5F 
4E 


5F 


5F 


5F 


4C 


45 


41 


54 
4F 


4s 


45 


54 


SF 


4E 


48 


53 
49 


52 


53 


5F 


54 


52 


52 


49 


43 


54 
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CONVERT_CONTROL = Convert “* 
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to control characte 12: -Sep-1 


45 


45 


45 


4C 


5F 


55 
49 


54 


45 


48 


57 


57 
52 


4D 


57 


4G 


51 
53 


53 


56 


47 


41 


45 


41 


45 
4F 


45 


45 


49 


FF 


4C 


52 
FF 


U.899: .ASCII 
O8388  rpaseveton” 
90 KB 


0.904: .B 
00559 ; TPASKEYST 
U.906: . ast {I 


S056 sTPASKEYSTO 


00566 ; sipasievét 
; ASCII 
QO37h BYTE 
0578 ; TRASKEYSTO 
v. .BLK 
00578  TPASKEYST 


U.920: .ASCII 
00587 
OS8A BYTE 
0588 ; TPASKEYSTO 
U.925: .BLKB 
0058B ; TPASKEYST 
U.927: .ASCII 
0058F BYTE 
00590 ; TPASKEYSTO 
U.932: .BLKB 
00590 ; TPASKEYST 
U.934: .ASCII 
0059C BYTE 
0059D ; TPASKEYSTO 
U.939: BLK 
0059D ; TPASKEYST 
U.941: ASCII 
0OSAS BYTE 
005A6 ; TPASKEYSTO 
U.946: .BLKB 
005A6 ; TPASKEYST 
U.948: .ASCII 
00585 
00580 BYTE 
OOSBE ; TPASKEYSTO 
U.953: .BLKB 
OOSBE ; TPASKEYST 
U.955: .ASCII 
OSCC BYTE 
N5CD ; TPASKEYSTO 
U.960: .BLKB 
OOSCD ; TPASKEYST 
U.962: .ASCII 
OSDA BYTE 
0508 ArCaexcys te 
0536 : ,BLKB 
O005DB ; TPASKEYST 
0.969: .ASCII 
OO REZ abxte 
E8 ; TPASKE ver? 
974:  BLKB 


AX=-11 BLi 
SMGRTL.SR 


\LF_GRAPHIC\ 


s$-32 V4.0-74 
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\LIGHT_SCREEN\ 


\LOWER_LEF T_CORNER\ 
-1 

0 
\LOWER_RIGHT_CORNER\ 
“1 

0 

\WAME\ 


0 
\NEWL INE. CHAR\ 


0 
\PAD_CHAR\ 


0 
\REQUEST_CURSOR_POSITION\ 
-1 

0 

\RESTORE_CURSOR\ 


0 
MIE VERSE 10H’ 


0 
\RIGHT_T_CHAR\ 


0 
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SAGSSTRING, TABL 
1-00 


4E 


45 


4E 


45 


52 


44. 


45 


&S 


45 


4C 


4c 


4F 


53 


45 


52 


53 


5F 


SF 


4F 


4F 


49 


SF 


5F 


41 


4F 


4F 


48 


48 


oh 


54 


4c 
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52 


57 


45 


84 


54 


57 


41 


4F 


45 


4F 


52 


56 


SF 


SF 


5F 


SF 


43 


4E 


53 


53 


4F 


45 


45 


59 


45 


45 


as 


49 


5F 


5F 


52. 55 43 


46 SF 4C 


52 SF 4C 


53 41 52 
41 4C 50 


53 41 52 


53 41 «52 


59 41 4 


53 41 52 


4C 50 50 


44 4) 


52 41 48 
45 53 


52 41 48 


SF 


4C 


4C 


45 
53 


45 
4E 


45 
50 


45 
45 


4] 
50 


43 
41 


43 


45 


4F 


4F 


SF 
49 


5F 
49 


5F 
53 


SF 
4E 


SF 
59 


5F 
52 


SF 


56 


52 


52 


4C 
44 


4C 
4C 


4C 
49 


4C 
49 


54 
45 


54 
45 


a4 
45 


4] 


45 
53 


53 
FF 


53 
FF 


53 


OOSES ; TPASKEYST 
U.976: yt) 


Soar :T veto. 


; TPASKE 
U.981: .BLKB 
O05F4 AS T 
U.983: .ASCII 
060 BYTE 
060 ,"Oggnever? 
U.988: .BLKB 
00603 ; TPASKEYST 
U.990: .ASCII 
0611 BYTE 
0612 ; TPASKEYSTO 
U.995: .BLKB 
00612 ; TPASKEYST 
U.997: ASCII 
0621 
062A -BYTE 
0062B ; TPASKEYSTO 
U.1002: .BLKB 
0062B ; TPASKEYST 
U.1004: .ASCII 
0063A 
00640 BYTE 
00641 ; TPASKEYSTO 
U.1009: .BLKB 
00641 ; TPASKEYST 
U.1011: .ASCII 
00650 
00658 BYTE 
00659 ; TPASKEYSTO 
U.1016: .BLKB 
00659 ; TPASKEYST 
U.1018: .ASCII 
00668 
0066 -BYTE 
0066E ; TPASKEYSTO 
U.1023: .BLKB 
QO066E ; TPASKEYST 
U.1025: .ASCII 
0067D 
0684 BYTE 
0685 jTOASKEYS TO 
U.1030: .BLKB 
00685 ; TPASKEYST 
U.1032: .ASCII 
00694 
0698 BYTE 
069C ; TPASKEYSTO 
U.1037: .BLKB 
0069C ; TPASKEYST 
U.1039: .ASCII 
06AB 
Q6AE BYTE 
LK 


AX-11 8 


1 itegs PY mes 
SMGRTL.SRCJSMGSTRTAB.B52;1 


\SAVE_ CURSOR\ 


0 
~ nana sheyaatate 


0 
NECROLL REVERSE 


0 
\SEL_ERASE_TO_END_DISPLAY\ 
“1 

0 

\SEL_ERASE_TO_END_LINE\ 
-1 

0 
\SEL_ERASE_WHOLE_DISPLAY\ 
-1 

0 

\SEL_ERASE_WHOLE_LINE\ 

-1 

0 
\SET_APPLICATION_KEYPAD\ 
-1 

0 
\SET_CHAR_NOT_SEL_ERASE\ 
-1 

0 

\SET_CHAR_SEL_ERASE\ 


ad 


re 


~~] 


K 10 


-BYTE 


SMGSSTRING_TABL TPARSE tables for string capabilities 16-Sep-1984 01:22:35 AX-11 Bliss-32 V4.0-74 
17808 CONVERT_CONTROL = Convert aPto control characte 12286848 4 93:98:82 SMGRTL SREISMESTRTAB.B 231 tecr 8 
53 42 41 SF 52 4F 53 52 55 43 SF 54 45 53 OOGAF ; TPASKEYST 
U.1046: .ASCII \SET_CURSOR_ABS\ : 
FF Q068D BYTE = : 
pee Nii eae 
59 45 4B SF 43 49 52 45 4D 55 4E SF 54 45 53 O06BE Abts + abd 
U.1055: .ASCII \SET_NUMERIC_KEYPAD\ : 
44 41 50 006CD 3 
FF 006D0 -BYTE <1 3 
art a 
49 47 45 52 SF 4C 4C 4F 52 43 53 SF 54 45 53 006D1 ; TPASKEYST 
U.1060: .ASCII \SET_SCROLL_REGION\ : 
4E 4F 49434 3 
FF QO6E -BYTE <1 : 
mes STARE Tree 
42 41 54 SF 54 45 53 O06E3 ; TPASKEYST 
U.1067: .ASCII \SET_TAB\ : 
FF QO6EA -BYTE 1 3 
see i nrHFEE Tso 
48 47 49 48 SF 45 4C 47 4E 49 53 OQ06EB ; TPASKEYST 
U.1074: .ASCII \SINGLE_HIGH\ 3 
FF QO06F6 -BYTE <1 : 
sot cae eae 
52 41 48 43 SF 42 41 54 OO6F7 ; TPASKEYST 
U.1081: .ASCII \TAB_CHAR\ : 
FF OO6FF -BYTE <1 : 
00700 ; TPASKEYSTO 
U.1086: .BLKB 0 
52 41 48 43 SF 54 SF 50 4F 54 00700 ; TPASKEYST 
U.1088: .ASCII \TOP_T_CHAR\ 3 
FF QO70A -BYT -1 : 
7 ARETE ke 
4E 4F 43 49 SF GE GF 49 54 41 43 GE 55 52 54 O0070B ; TPASKEYST 
U.1095: .ASCII \TRUNCATION_ICON\ 3 
FF OO71A -BYTE <1 ; 
0071B ; TPASKEYSTO 
U.1100: .BLKB 0 
52 41 48 43 SF 45 4E 49 4C 52 45 44 4E 55 0071B ; TPASKEYST 
U.1102: .ASCII \UNDERLINE_CHAR\ 3 
FF OOrg BYTE -1 : 
0072A ; TPASKEYSTO 
U.1107: .BLKB 0 
54 46 45 4C SF 52 45 50 50 ; TPASKEYST 
- U.1109: .ASCII \UPPER_LEFT_CORNER\ 
-BYTE =1 
; TPASKEYSTO 
U.1114: .BLKB 0 
48 47 49 52 SF 52 45 50 50 ; TPASKEYST 
52 65 U.1116: .ASCII \UPPER_RIGHT_CORNER\ 


-1 


SMGSSTRING_TABL hed 5 tables 
1-00 CON 


41 


42 


43 


52 


45 


54 


54 


54 


54 


54 


54 


54 


5F 


49 


52 


46 


53 


53 


53 


53 


53 


53 


53 


4c 


41 


49 


5F 


SF 


5F 


5F 


SF 


5F 


5F 


for string capabilities 
VERT_CONT ROL - Convert * to contro 


41 


1 4 


45 


45 


45 


45 


45 


45 


45 


43 49 54 


SF 


5F 


54 


54 


54 


54 


54 


54 


54 


52 


48 


48 


a) 


41 


41 


41 


41 


41 


47 


54 


56 


56 


56 


56 


56 


56 


56 


52 


SF 


4a 


4h 


49 


49 


49 


49 


49 


49 


45 


54 


49 


4G 


52 


52 


52 


52 


52 


52 


56 
FF 


56 
FF 


57 
FF 


57 
FF 


50 
FF 


5uU 
FF 


50 
FF 


50 
FF 


50 
FF 


50 
FF 


50 
FF 


0074F 
0074F 

O78¢ 
0075¢ 


0076 
0076 


00767 


00773 
00774 


00774 


0077E 
0077F 


0077F 


0078C 
00780 


0078D 
0079A 
00798 


007A9 


l characte 13e ats 7 93 6: de SMGRTL® TL.S 


; TPASKEYSTO 
U.1121: .BLKB 
;TPA REVST 
U.1123: .ASCII 
BYTE 
; TPASKEYSTO 
U.1128: .BLK 
; TPASKEYST 
U.1130: .ASCII 
BYTE 
Aroaseersto 
U.1135: .BLKB 
ATL ibe 
U.1137: .ASCII 
BYTE 
; TPASKEYSTO 
U.1142: .BLKB 
3; TPASKEYST 
U.1144: .ASCII 
BYTE 
3; TPASKEYSTO 
U.1149: .BLKB 
3; TPASKEYST 
U.1151: .ASCII 
BYTE 
; TPASKEYSTO 
U.1156: .BLKB 
3; TPASKEYST 
U.1158: .ASCII 
-BYTE 
; TPASKEYSTO 
U.1163: .BLKB 
3; TPASKEYST 
U.1165: .ASCII 
BYTE 
TPASKEYSTO 
é. 1170: .BLKB 
; TPASKEYST 
0.1172: .ASCII 
BYTE 
3; TPASKEYSTO 
U.1177: .BLKB 
3; TPASKEYST 
U.1179: .ASCII 
BYTE 
3; TPASKEYSTO 
U.1184: .BLKB 
; TPASKEYST 
U.1186: .ASCII 
BYTE 
3; TPASKEYSTO 
U.1191: .BLKB 
3; TPASKEYST 
U.1193: ASCII 
BYTE 
; TPASKEYSTO 
U.1198: .BLKB 


0 
\YERTICAL_BAR\ 


oOo 


\T_GRAPHIC\ 


0 
Mah armas 


0 
\WIDTH_WIDE\ 


0 
\PRIVATE_STR_1\ 


0 
MERIVATE STR_2N 


0 
\PRIVATE_STR_3\ 


0 
\PRIVATE_STR_4\ 


0 
\PRIVATE_STR_5\ 


0 
\ERIVATE _STA_EN 


0 
\PRIVATE_STR_7\ 


ss-32 V4.0 
CISMGSTRIAB. 3 231 


"10 
MGSSTRING_TABL TPARSE tables for string capabilities 16-Sep-1984 01:22:35 AX-11 - 4. 
at CONVERT_CONTROL = Convert APO control characte 14- Sep- 382 04:98:32 SMGRTL SR eicacstatas 6 832;1 _ ( 
38 SF 52 54 53 SF 45 54 41 56 49 52 50 O07E1 AToggneyst 
U.1200: .ASCII \PRIVATE_STR_8\ : 
FF OQO7EE -BYTE <1 3 
OF TNE so 
39 SF 52 54 53 SF 45 54 41 56 49 52 50 OO7EF ; TPASKEYST 
U.1207: .ASCII \PRIVATE_STR_9\ : 
FF 8 7FC BYTE =1 3 
oe eee eerke 0 
30 31 SF 52 54 53 SF 45 54 41 56 49 52 50 OO7FD ; TPASKEYST 
U.1214: .ASCII \PRIVATE_STR_10\ : 
FF 00808 .BYTE =1 : 
FF OO80C ; TPASKEYFILL 
U.1221: .BYTE <1 3 


-PSECT _LIBSSTATES,NOWRT, SHR, PIC,1 
00000 SHGSSA_STRING_STATES: : 
00000 BEGIN_SCAN: 


p 0 
99F8 00000 ; TPASTYPE 
U.2: .WOR -26120 3 
0000* 00002 ; TPASSUBEXP 
v. WOR <<U.35-U.4>=2> : 
00000000* 00004 : TPASACTION 
v. LON <<SMGSSNEXT_RECORD-U.5>-4> : 
0000* 00008  TPASTARGET 
U.6: «WORD <<BEGIN_SCAN-U.6>-2> : 
9021 OO00A ; TPASTYPE 
U.?7: " 28639 3 
00000000* OO00C ; TPASACTION 
U.8: ‘ <<SMGSSNEXT_RECORD-U.8>-4> : 
0000* 00010 ; TPASTARGET 
0,3: . <<BEGIN_SCAN-U.9>=2> F 
99F8 00012 ; TPASTYPE 
U.10: , -26120 3 
0000* 00014 ; TPASSUBEXP 
U.12 . <<U.11-U.12>-2> 3 
00000000* 00016 ; TPASACTION 
U.13 oL <<SMGSSBLANKS_OF F-U.13>-4> : 
0000* OO01A ; TPASTARGET 
U.14: ,WORD <<BEGIN_SCAN-U.14>-2> : 
15F6 OOOIC ; TPASTYPE 
U.15:  .WORD 5622 : 
FFFF OOO1E ; TPASTARGET 
U.16: .WORD -1 : 
00020 ;END_OF_LINE 
U.3: -BLKB 0 
11F7 00020 ; TPASTYPE 
U.17: WORD 4599 : 
FFFF 00022 A" petanes | ‘ 
1021 00024 ae getere 
U.19: 129 : 


WORD 
FFFF 00026 ; TPASTARGET 


SMGSSTRING_TABL beat tables 
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for string capabilities 


15F6 
FFFE 


99F8 
0000+ 
00000000* 
0000+ 
1100 
FFFE 
1101 
FFFE 
1102 
FFFE 
1103 
0000* 
9104 
00000000* 
FFFE 
9105 
00000000* 
FFFE 
85F1 
00000000Vv 


7106 
00000000* 
00000189 

FFFF 


to control characte 1 


00028 
0002A 
0002C 
0002C 
0002E 
00030 
00034 
00036 
00038 
Q003A 
0003¢ 
0003E 
00040 
00042 
00044 
00046 
00048 
0004C 
0004E 
00050 
00054 
00056 
00058 
0005C 
0005C 
0005€ 
00062 
00066 


1% 


one 
PDVRVR OVD VHA VA DNDN DNDN DNF OL UP UL UW UW UW UW UN UN UN 9 SUN ON eaeo 


© 


Cee Cee Cee Cee Cee Cee Cee Cee Cee Cee Cee Cee Cee Cee Cee Cee Cee Cee C 
—e —e —te —te —te =e =e =—je =e =e —$e Oe —te te 


ce. 
—:e —te —te —te —¢e 


oo Cee Cee Cee Cee Cee Cee Cee 
—:e —te —<te Ge —te 


G 
;TBASTARGE! 
U.70: RD 


“1382 V3iF6i02 — FoMoate’s 


s$-32 V4.0-7 
CJSMGSTRTAB. : 231 


<1 

5622 
“2 
0 
-26120 
<<U.24°U.25>=2> 
<<SMGSSBLANKS_OF F-U.26>-4> 
<<U.27-U.28>-2> 
4352 
-2 
4353 
-2 
4354 
-2 
4355 
<<BEGIN_SCAN=-U.48>-2> 
28412 
<<SMGS$S$MISSING_END-U.53>-4> 
-2 
-28411 
<<SMGS$MISSING_END-U.59>-4> 
-2 
-31247 
<<NOT_STRING-U.62>-4> 
0 
28934 
<<SMGSSMASK_ADR-U.68>-4> 
441 
-1 


SMGSSTRING_TABL TPARSE tables 
1-00 CON 


1 
for string capabilities Belge -1984 
VERT_CONTROL = Convert at + control characte 2: ~8ep-1984 rat t 6: 32 SMGRTL. 


7107 
00000000* 
000001BA 

FFFF 

7108 
00000000* 
00000188 

FFFF 

7109 
00000000* 
0000018C 

FFFF 

710A 
00000000* 
0000018D 

FFFF 

7108 
00000000* 
000001BE 

FFFF 

710¢ 
00000000* 
00000253 

FFFF 

7100 
00000000* 
000001BF 

FFFF 

710€ 


00068 
Q006A 
0006E 
00072 ; 
00074 ; 
00076 ; 
0007A 
OOO7E ; 
00080 
00082 
00086 
0008A 
0008C 
0008E 
00092 
00096 ; 
00098 
0009A 
0009E 
Q00A2 
Q00A4 
000A6 
QOOAA 
OOOAE 
00080 
00082 
00086 
QOOBA 
000BC 


; TRASTYPE 


: TPASADDR 
U.75: _ LONG 


ol 
; TPASADDR 


: TPASMASK 
U.90:_— . LONG 
; TPASTARGET 


S TPASTYPE 
U.95: _ . WORD 
; TPASADDR 
U.96: _ . LONG 
; TRASMASK | 


AX-11 BLi jegeze eye 
SRC 


28935 
<<SMGSSMASK_ADR-U.75>=4> 
442 

-1 

28936 
<<SMGSS$MASK_ADR-U.82>-4> 
443 

-1 

28937 
<<SMGSSMASK_ADR-U.89>-4> 
444 

-1 

28938 
<<SMGSSMASK_ADR-U.96>=-4> 
445 

-1 

28939 

<<SMG$$MASK_ADR-U. 103>-4> 
446 

-1 

28940 
<<SMGSSMASK_ADR-U.110>-4> 
595 

-1 

28941 
<<SMGSSMASK_ADR-U.117>-4> 
447 

“1 


-0-7 
SMGSTRTAB. : 231 


SMGSSTRING TABL T 
1-00 


PARSE tables for string capabilities 


CONVERT_CONTROL = Convert * 


00000000* 
000001C0 
FFFF 
710F 
00000000* 
000001C1 
FFFF 
7110 
00000000* 
000001C2 
FFFF 
7111 
06000000* 
00000249 
FFFF 
7112 
00000000* 
000001C3 
FFFF 
7113 
00000000* 
0000014 
FFFF 
7114 
00000000* 
000001C5 
FFFF 
7115 


to control characte 14-Sep-1 


11 
1b-Sep-1 
U.123: . WORD 
OOOBE ; TPASADD 
U.124: . LONG 
000C¢2 Nt eee 
U.125: .LONG 
000C6 ; TPASTARGET 
Os leet WORD 
000C8 ; TPASTYPE 
U.130: .WORD 
OOOCA ; TPASADDR 
U.131: LONG 
QOOCE ; TPASMASK 
U.132: . LONG 
000D2 ; TPASTARGET 
U.133: WORD 
00004 ; TPASTYPE 
U.137: WORD 
000D6 ; TPASADDR 
U.138: .LONG 
QOODA ; TPASMASK 
U.139: .LONG 
OQOODE ; TPASTARGET 
U.140: .WORD 
QOOEO ; TPASTYPE 
U.144: WORD 
OOOE2 ; TPASADDR 
U.145: . LONG 
QOOES ; TPASMASK 
U.146: LONG 
QOOEA ; TPASTARGET 
U.147: WORD 
OOOEC ; TPASTYPE 
U.151: WORD 
QOOEE ; TPASADDR 
U.152: .LONG 
OOOF2 ; TPASMASK 
U.153: LONG 
OOOF6 ; TPASTARGET 
U.154:  .WORD 
OOOF8 ; TPASTYPE 
U.158: .WORD 
OOOFA ; TPASADD 
U.159:  . LONG 
OOOFE YS: me 
U.160: .LONG 
00102 ; TPASTARGET 
U.161: WORD 
00104 ; TPASTYPE 
U.165:  . WORD 
00106 ; TPASADDR 
U.166: .LONG 
00O10A M4, ama 
U.167:  . LONG 
0010€ Nh Haat 
U.168: .WORD 
00110 p Test yee 
U.172: WORD 


Be 15:96:00 


AX-11 Oh tegeze V4.0-74 
SMGRTL.SRCJSMGST 


RTAB.B52;1 


<<SMGSSMASK_ADR=U.124>-4> 


<<SMGSSMASK_ADR-U.131>=4> 


<<SMGSSMASK_ADR-U. 138>-4> 


<<SMGSSMASK_ADR-U.145>-4> 


<<SMGSSMASK_ADR-U.152>-4> 


<<SMGSSMASK_ADR-U. 159>-4> 


<<SMGSSMASK_ADR-U.166>-4> 


SMGSSTRING_TABL ead | tables 
1-00 CON 


for string capabilities 
VERT_CONT ROL - Convert * to control characte 1 


00000000* 
0000024F 
FFFF 
7116 
00000000* 
00000247 
FFFF 
7117 
00000000* 
00000250 
FFFF 
7118 
00000000* 
000001C6 
FFFF 
7119 
00000000* 
000001C7 
FFFF 
711A 
0v000000* 
000001¢8 
FFFF 
7118 
00000000* 
000001C9 
FFFF 
711C 
00000000* 


00112 
00116 
OO11A 
0011C 
OO11E 
00122 
00126 
00128 
0012A 
0012E 
00132 
00134 
00136 
0013A 
0013€ 
00140 
00142 
00146 
0014A 
0014C 
0014E 
00152 
00156 
00158 
0015A 
0015€ 
00162 
00164 
00166 ; 


ie t9Bs 1:95 33 


—~ 
° —dee 
—— 


WORD 


3; TPA ADDR 
U.173: LONG 
; TPA MASK 
U.174: . LONG 
pTCOBTARGE T 
U.175: WORD 
g OQ ST PE 
U.179: WORD 
: TPASADDR 
U.180: .LONG 
; TPASMASK 
U.181:  . LONG 
; TPASTARGET 
U.182: WORD 
; TPASTYPE 
U.186: . WORD 
; TPASADDR 
U.187: .LONG 
3; TPASMASK 
U.188: . LONG 
3; TPASTARGET 
U.189:  . WORD 
; TPASTYPE 
U.193: . WORD 
3; TPASADD 
U.194: .LONG 
3; TPASMASK 
U.195: LONG 
3 TPASTARGET 
U.196: .WORD 
; TPASTYPE 
U.200: .WORD 
3; TPASADDR 
U.201: .LONG 
; TPASMASK 
U.202: .LONG 
; TPASTARGET 
U.203: .WORD 
; TPASTYPE 
U.207: .WORD 
3; TPASADDR 
U.208:  .LONG 
; TPASMASK 
U,209 LONG 
3; TPASTARGET 
U.210: .WORD 
s TPASTY 
U.214: WORD 
; TPASADDR 
U.215: . LONG 
; TPASMASK 
U.216: LONG 
pSAB TARGET 
U.21 WORD 

PASTYPE 

221: 

TPAS 


e-. oo 


ADDR 


SRGRTL SRCSSMGSTRTAB.682; 1 
<<SMGSSMASK_ADR-U.173>-4> 
591 

<1 

28950 

<<SMGSS$MASK_ADR-U. 180>=4> 
583 

-1 

28951 
<<SMGSSMASK_ADR=-U.187>-4> 
592 

-1 

28952 
<<SMG$$MASK_ADR-U.194>=4> 
454 

-1 

28953 
<<SMGSSMASK_ADR-U.201>=4> 
455 

-1 

28954 
<<SMGSSMASK_ADR-U.208>-4> 
456 

-1 

28955 
<<SMGSSMASK_ADR-U.215>-4> 
457 


Page 32 
— (4) 


Ss 


SRGSE TRING. TABL T 


PARSE tables for string capabilities 
CONVERT_CONTROL = Convert 


Q00001CA 
FFFF 
7110 

00000000* 

000001CB 
FFFF 
711E 

00000000* 

000001CC 
FFFF 
711F 

00000000* 

000001CD 
FFFF 
7120 

00000000* 

000001CE 
FFFF 
7121 

00000000* 

000001CF 
FFFF 
7122 

00000000* 

00000100 
FFFF 
7123 

00000000* 


1 
* to control characte 16-3 71383 93:98:32 


1 
ep 
ep 
U.222: .LONG 
0016A ; TPASMAS 
U.223: .LONG 
OO16E ; TPASTARGET 
U.224:  .WORD 
00170 pTeaetye 
U.228: .WORD 
00172 ; TPASADD 
U.229: .LONG 
00176 ; TPASMASK 
U.230: .LONG 
0017A ; TPASTARGET 
U.231: WORD 
0017C ; TPASTYPE 
U.235: .WORD 
O017E ; TPASADDR 
U.236: .LONG 
00182 ; TPASMASK 
U.237: .LONG 
00186 ; TPASTARGET 
U.238:  . WORD 
00188 ; TPASTYPE 
U.242: WORD 
0018A ; TPASADDR 
U.243: .LONG 
OO18E ; TPASMASK 
U.244: . LONG 
00192 ; TPASTARGET 
U.245: WORD 
00194 ; TPASTYPE 
U.249: .WORD 
00196 ; TPASADDR 
U.250: .LONG 
0019A ; TPASMASK 
U.251: . LONG 
O019E ; TPASTARGET 
U.252:  .WORD 
O01A0 ; TPASTYPE 
U.256:  .WORD 
OO1A2 ; TPASADDR 
U.257: .LONG 
Q01A6 ; TPASMASK 
U.258: . LONG 
OO1AA ; TPASTARGET 
U.259: . WORD 
OO1AC pTCAgTYPe 
U.263: WORD 
QO1AE ; TPASADDR 
U.264: LONG 
001B2 A CeenAse 
U.26 ~LONG 
001B6 ; TPASTARGET 
v. 266: .WOR 


00188 ; TRAST YPE | VOR 
OO1BA ; TPASADDR 
0.271: 


Dd 
- LONG 


AX=11 Bi ist -32 V4.0 


<<SMGSSMASK_ADR=U.222>-4> 
458 

1 

28957 
<<SMGSSMASK_ADR=U.229>=4> 
459 

-1 

28958 
<<SMGS$MASK_ADR-U.236>-4> 
460 

-1 

28959 

<<SMGSS$MASK_ADR=-U. 243>-4> 
461 

-1 

28960 
<<SMGSSMASK_ADR-U.250>-4> 
462 

-1 

28961 
<<SMGSSMASK_ADR-U.257>-4> 
463 

-1 

28962 
<<SMGSSMASK_ADR-U.264>-4> 
464 

-1 

28963 
<<SMGSSMASK_ADR-U.271>-4> 


SMGRTL. §Rei SMGSTRTAB. if 2;1 


SAGSSTRING.TABL | 
1-00 


PARSE tables for string capabilities 


CONVERT_CONTROL = Convert * to control characte 12: se0-1984 94 6: aa 


00000101 
FFFF 
7124 

00000000* 

000001D2 
FFFF 
7125 

00000000* 

00000103 
FFFF 
7126 

00000000* 

00000104 
FFFF 
7127 

00000000* 

00000105 
FFFF 
7128 

00000000* 

00000106 
FFFF 
7129 

00000000* 

00000107 
FFFF 
712A 

00000000* 

00000108 


F 4 


OO1BE ; TPASMASK 
U.272: .LONG 
001C2 ; TPASTARGET 
U.273: WORD 
001¢4 p TOAST vPE 
U.277: WORD 
0016 p TEARADOR 
U.278: .LONG 
OO1CA Wt ee 
U.279: . LONG 
OO1CE ; TPASTARGET 
HT stt WORD 
00100 ; TPASTYPE 
U.284: . WORD 
001D2 ; TPASADDR 
U.285: .LONG 
001D6 ; TPASMASK 
U.286: .LONG 
OO1DA ; TPASTARGET 
OO1DC ; TPASTYPE 
U.291: WORD 
OO1DE ; TPASADDR 
U.292: .LONG 
OO1E2 ; TPASMASK 
U.293: LONG 
OO1E6 ; TPASTARGET 
U.294: . WORD 
OO1E8 ; TPASTYPE 
U.298: .WORD 
OO1EA ; TPASADDR 
U.299: . LONG 
OO1EE ; TPASMASK 
U.300: .LONG 
OO1F2 ; TPASTARGET 
U.301: .WORD 
OO1F4 ; TPASTYPE 
U.305: .WORD 
OO1F6 ; TPASADDR 
U.306: .LONG 
OO1FA ; TPASMASK 
U.307: .LONG 
OO1FE ; TPASTARGET 
U.308: .WORD 
00200 ; TPASTYPE 
U3! : WORD 
00202 ; TPASADDR 
U.313: . LONG 
00206 ; TPASMASK 
U.314: LONG 
0020A pTRARTARGE 
U.315: WORD 
0020C ; TPASTYPE 
U. 319: WORD 
OO20E ; {TEARADD DR 
. LONG 


00212 TTPASHASK 


AX-11 Bliss-32 V4.0-74 
SMGRTL.SRCJSMGSTRTAB.B52;1 
465 

-1 

28964 
<<SMGSSMASK_ADR=-U.278>-4> 
466 

<1 

28965 

<<SMGSSMASK_ADR-U. 285>-4> 
467 

-1 

28966 
<<SMGSSMASK_ADR-U.292>=4> 
468 

-1 

28967 
<<SMGSSMASK_ADR-U.299>-4> 
469 

-1 

28968 
<<SMGSSMASK_ADR-U.306>-4> 
470 

-1 

28969 
<<SMGSS$MASK_ADR-U.313>-4> 
471 

-1 

28970 
<<SMGSSMASK_ADR-U.320>-4> 


sngs TRING_TABL CONVERT. tele 


1 
p fer string capabilities 18- $ 
“to control characte 14-$ 


FFFF 
7128 
00000000* 
00000109 
FFFF 
712C 
00000000* 
000001DA 
FFFF 
7120 
00000000* 
00000108 
FFFF 
712E 
00000000* 
0000024A 
FFFF 
712F 
00000000* 
0000010C 
FFFF 
7130 
00000000* 
00000100 
FFFF 
7131 
00000000* 
0000024C 


0025€ 
00260 
00262 ; 
00266 ; 


477 

-1 

28977 

<<SMGSSMASK_ADR-U. 369>-4> 


1 
e AX=11 Bliss-32 V4.0-74 
Cpr 18be FSi T8ibe — FAMGAT Ob eS saa ve Oe ke 
U.321: . 472 
00216 itgastan 
00218 ; TPASTYPE 
o021A SfPasapDR aioe 
A eee <<SMGSSMASK_ADR=U. 327>=4> 
O021E ; TPABHASK 
b.328:. 473 
00222 ; TPASTARGET 
U.329: -1 
00224 ; iPAstyPé 
00226 YiPasanDR mre 
U.334: . <<SMGSSMASK_ADR-U.334>-4> 
0022A ; TPASMASK 
b.335:. 474 
0022E ;: TPASTARGET 
U . 336 : . W -1 
00230 ; TPASTYPE 
00232 STPasanpk sist 
0.341: . <<SMGSSMASK_ADR-U. 341>-4> 
00236 ; TPASMASK 
U.342: . 475 
0023A : TRABTARGET 
U.343:_ . -1 
0023¢ ; TPASTYPE 
oo2se ViRASADDA sh 
U.348: <<SMGSS$MASK_ADR-U.348>-4> 
00242 ; TPASMASK 
b.349: 586 
00246 ; TPASTARGET 
U.350: . -1 
00248 ; TPASTYPE 
oo2sa LtPAsanDR hei 
0.355: . <<SMGSS$MASK_ADR-U. 355>=4> 
OO24E ; TPASMASK 
b.356: 476 
00252 ; TPASTARGET 
U.357: . -1 
00254 ; TPASTYPE 
00256 VteesAppR _— 
U.362: . <<SMGSSMASK_ADR-U. 362>-4> 
00250: #BABMASK 
363: 
PAS 
364: 
PAS 
id, 
TEAS 
iPA 
37 


o--, 


588 


Page 35 
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FFFF O026A IGSTARGET. 
U.37 ORD 
7132 0026C ; TPASTYPE 
U.375: WORD 
00000000* 0026€ NA aaa 
00000251 00272 ;TBABRAS 
U.377: «LONG 
FFFF 00276 g TRASTARGET 
U.378: WORD 
7133 00278 ; TPASTYPE 
U.382: WORD 
00000000* 0027A ; TPASADDR 
U.383: .LONG 
QO0001DE O027E ; TPASMASK 
U.384: .LONG 
FFFF 00282 ; TPASTARGET 
U.385:  .WORD 
7134 00284 ; TPASTYPE 
U.389: . WORD 
00000000* 00286 ; TPASADDR 
U.390: .LONG 
Q00001DF O0028A ; TPASMASK 
U.391: LONG 
FFFF OO28E ; TPASTARGET 
HTH WORD 
7135 00290 ;TPASTYPE 
U.396: .WORD 
00000000* 00292 ;TPASADDR 
U.397: .LONG 
QOO001EO 00296 ; TPASMASK 
U.398: .LONG 
FFFF O029A ; TPASTARGET 
U.399:  .WORD 
7136 0029C ats Hale 
U.403: WORD 
00000000* 0029E ;TPASADDR 
U.404: .LONG 
000001E1 O02A2 ; TPASMASK 
U.405: .LONG 
FFFF OO2A6 ; TPASTARGET 
U.406:  .WORD 
7137 O0O2A8 ; TPASTYP 
U.410: WORD 
00000000* O02AA ; TPASADDR 
U.411: LONG 
QOOO01E2 OO2AE ; TPASMASK 
U.412:  . LONG 
FFFF Q0O2B2 ; TPASTARGET 
U.413: . WORD 
7138 002B4 ; TPASTYPE 
U.417: WORD 
00000000* 00286 ALYY Ve 
U.418: .LONG 
000001E3 O002BA ett on 
FFFF OO2BE ;T iPASTARGES 


28978 
<<SMGSSMASK_ADR-U.376>-4> 
593 

-1 

28979 
<<SMGSSMASK_ADR=-U.383>-4> 
478 

-1 

28980 
<<SMGSSMASK_ADR-U.390>-4> 
479 

-1 

28981 

<<SMGSSMASK_ADR-U. 397>=4> 
480 

-1 

28982 
<<SMGSSMASK_ADR-U.404>-4> 
481 

-1 

28983 
<<SMGSSMASK_ADR-U.411>=4> 
482 

-1 

28984 
<<SMGSSMASK_ADR-U.418>-4> 
483 


H 1 
SMGSSTRING_TABL TPARSE tables for string capabilities 16-Sep-1984 01:22:35 AX-11 - 
ego8 CONVERT_CONTROL = Convert apo control characte 12: S60 1984 94:98:32 SMGRTL SR eScaastate 5 B82; 71 Aoner 


SAGSSTRING_TABL 


TPARSE tables for string capabilities 


Sep-1984 AX-11 Blis 
CONVERT_CONTROL = Convert * to control characte 1b-te Hatt fi 9}: #6; , SMGRTL.SRC 


7139 
00000000* 
000001E4 

FFFF 

713A 
00000000* 
000001E5 

FFFF 

7138 
00000000* 
000001E6 

FFFF 

713C 
00000000* 
000001E7 

FFFF 

7130 
00000000* 
000001E8 

FFFF 

713E 
00000000* 
000001E9 

FFFF 

713F 
00000000* 
QOOOO1EA 

FFFF 


42 WORD 
002C0 Use ee: PE 
U. 424: WORD 
002C2 ; Tess hoon 
U.425: .LONG 
002C6 ; TPASMASK 
U.426: .LONG 
002CA ; TPASTARGET 
U.427: WORD 
OO2CC ; TPASTYPE 
U.431: WORD 
OO2CE ; TPASADDR 
U.432: .LONG 
002D2 ; TPASMASK 
Us83 : _.LONG 
00206 ; TPASTARGET 
U.434:  .WORD 
00208 pTeastye 
U.438:  .WORD 
002DA ; TPASADDR 
U.439: . LONG 
O02DE ; TPASMASK 
U.440: .LONG 
OO2ZE2 ; TPASTARGET 
U.441: WORD 
OO2E4 ; TPASTYPE 
U.445: WORD 
002E6 ; TPASADDR 
U.446: .LONG 
OO2ZEA ; TPASMASK 
U.447: LONG 
OO2ZEE ; TPASTARGET 
U.448: .WORD 
OO02FO ; TPASTYPE 
U.452: . WORD 
002F2 Ws aaa 
U.453: . LONG 
002F6 ; TPASMASK 
U.454: . LONG 
OO2FA TW Mama 
U.455: WORD 
OO2FC ; TPASTYPE 
U.459: WORD 
OO2FE pTeapAeon 
U.460: .LONG 
00302 ; TPASMASK 
U.461: .LONG 
00306 ; TPASTARGET 
U.462:  .WORD 
00308 ; TPAS$TYPE 
U.466: WORD 
0030A pT OBgAoOR 
U.467: .LONG 
0030E WT ree 
U.468: .LONG 
00312 Nat Haat 
U.469: .WO 


28985 
<<SMGSSMASK_ADR-U.425>-4> 
484 

-1 

28986 
<<SMGSSMASK_ADR-U.432>-4> 
485 

-1 

28987 
<<SMGSS$MASK_ADR=-U.439>-4> 
486 

-1 

28988 
<<SMGSSMASK_ADR-U.446>-4> 
487 

-1 

28989 
<<SMGSSMASK_ADR-U.453>-4> 
488 

-1 

28990 
<<SMGSSMASK_ADR-U.460>-4> 
489 

-1 

28991 
<<SMGSS$MASK_ADR-U.467>=4> 
490 

-1 


-32 V4.0-7 
CJSMGSTRTAB. : 231 


Page 37 
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$! 


SMGSSTRING_TABL haat | tables for string capabilities 
1-00 CONVERT_CONTROL = Convert “ 


7140 
00000000* 
000001EB 

FFFF 

7141 
00000000* 
OOOODTEC 

FFFF 

7142 
00000000* 
000001ED 

FFFF 

7143 
00000000* 
OOOO01EE 

FFFF 

7144 
00000000* 
OOOOO1EF 

FFFF 

7145 
00000000* 
000001F0 

FFFF 

7146 
00000000* 
000001F 1 

FFFF 

7147 


to control characte 1 


00314 
00316 
OO31A 
OO31E 
00320 
00322 
00326 
0032A 
0032¢ 
0032E 
00332 
00336 ; 
00338 
0033A 
0033€ 
00342 
00344 
00346 
0034A 
0034E 
00350 
00352 ; 
00356 
O035A 
0035¢ 
0035E 
00362 
00366 ; 
00368 ; 


; TPA TYPE 


Cee Cee Cee Cee Cee 
—:e —§0e —§j0 =—§8 —te 


oe dee 
~< 


ado 


t 


oo ace amd Be wee 
<x 2e>eFo =< 
wv waweuwngo VU 
me Gye Re We re 

mm 
=¢ 


* Be 
> 


ce 
—e —te 
DU PUNVNDUN DNDN DNDN DNDN DN DUDE OP OP OP UR UP UR UP UPUPUPRUPUPUPRURUF 
~ 
iw 


>—>— > SK SK FP KH POP OF OPF OP OF OP OF OF OP OF OP OPrPOrOrorororor~>~> 
Se eS Re ee Se eee 

_ 

i” 

Oo 

2 

a 


z-> 
> 9 
” 9g 
me Dw 


"ie 


AX-11 B 


het seb-1986 13:10:04  Femcrte sreisnestRige.- 692.1 


28992 
<<SMGSSMASK_ADR=-U.474>-4> 
491 

-1 

28993 
<<SMGSSMASK_ADR-U.481>-4> 
492 

-1 

28994 
<<SMGSSMASK_ADR-U.488>-4> 
493 

-1 

28995 
<<SMGSS$MASK_ADR-U.495>-4> 
494 

-1 

28996 
<<SMGSSMASK_ADR-U.502>-4> 
495 

-1 

28997 
<<SMGSS$MASK_ADR-U.509>-4> 
496 

-1 

28998 
<<SMGSSMASK_ADR-U.516>-4> 
497 

-1 


SAGSSTRING TABL T 


CONVERT_CONTROL = Convert “* 


PARSE tables for string capabilities 


00000000* 
000001F2 
FFFF 
7148 
00000000* 
000001F3 
FFFF 
7149 
00000000* 
000001F4 
FFFF 
714A 
00000000* 
000001F5 
FFFF 
7148 
00000000* 
000001F6 
FFFF 
714C 
00000000* 
000001F7 
FFFF 
7140 
00000000* 
000001F8 
FFFF 
714E 


to control characte 


1 
1 


0036A 
0036E 
00372 
00374 
00376 
0037A 
0037E 
00380 


00386 
0038A 
0038C 
0038E 
00392 


00398 
0039A 
0039E 
003A2 
OO3A4 
003A6 
OO3AA 
OO3AE 
00380 
00382 
00386 
0O3BA 
003B8C 


1 
-Sep-1 
Sep-1 


a 11:48:82 


AX=-11 Bliss-32 
SMGRTL. RCISMG 
28999 
<<SMGSSMASK_ADR=U.523>=4> 
498 

-1 

29000 
<<SMGSSMASK_ADR-U.530>-4> 
499 

-1 

29001 
<<SMGSSMASK_ADR-U.537>-4> 
500 

-1 

29002 
<<SMGSSMASK_ADR-U.544>=4> 
501 

-1 

29003 
<<SMGSSMASK_ADR-U.551>-4> 
502 

-1 

29004 
<<SMGSSMASK_ADR-U.558>-4> 
503 

-1 

29005 
<<SMGSSMASK_ADR-U.565>-4> 
504 

-1 

29006 


STRTAB.B52;1 


SPGSS TRING. TABL ine 


s for string capabilities 
NVERT “CONT ROL - Convert * to control characte 1 


ifodeo-19Be 01:99:85 


00000000* O03BE ; TPASADDR 
U. 572: .LONG 
000001F9 O003C2 ; TPASMASK 
U.573: .LONG 
FFFF O03C6 ; TPASTARGET 
U.574: WORD 
714F 003C8 p TEAST YPE 
U.578:  .WORD 
00000000* O03CA j TER SADOR 
U.579: .LONG 
OOOOOIFA OO3CE ; TPASMASK 
U.580: .LONG 
FFFF 00302 ; TPASTARGET 
U.581: .WORD 
7150 00304 ; TPASTYPE 
U.585: .WORD 
00000000* 00306 ; TPASADDR 
U.586: .LONG 
OOO001FB O03DA ; TPASMASK 
U.587: .LONG 
FFFF QO3DE ; TPASTARGET 
U.588: .WORD 
7151 OO3E0 ; TPASTYPE 
U.592: .WORD 
00000000* 003E2 ; TPASADDR 
U.593: LONG 
QOOOO1FC O03E6 ; TPASMASK 
U.594: . LONG 
FFFF OO3EA ; TPASTARGET 
U.595: . WORD 
7152 OO3EC ; TPASTYPE 
U.599: .WORD 
00000000* OO3EE ; TPASADDR 
U.600: .LONG 
OOOO001FD O03F2 ; TPASMASK 
U.601: . LONG 
FFFF OO3F6 ; TPASTARGET 
U.602: .WORD 
7153 OO3F8 ; TPASTYPE 
U.606: .WORD 
00000000* OO3FA ; TPASADDR 
U.607: .LONG 
OQOOOOIFE OOSFE ; TPASMASK 
U.608: .LONG 
FFFF 00402 ; TPASTARGET 
U.609:  .WORD 
7154 00404 ; TPASTYPE 
U.613: .WORD 
00000000* 00406 ; TPASADDR 
U.614: . LONG 
OOOOO1FF O040A Wty eae 
U.615: LONG 
FFFF OO4OE ; TPASTARGET 
U.616: .WOR 
7155 00410 freon vPe 
U.62 WORD 
00000000* 00412 ; TPASADDR 


<<SMGSSMASK_ADR=U.572>=4> 
505 

-1 

29007 
<<SMGSSMASK_ADR-U.579>=4> 
506 

-1 

29008 

<<SMGSSMASK_ADR-U. 586>-4> 
507 

-1 

29009 
<<SMGSSMASK_ADR-U.593>-4> 
508 

-1 

29010 
<<SMGSSMASK_ADR-U.600>-4> 
509 

-1 

29011 
<<SMGSS$MASK_ADR-U.607>-4> 
510 

-1 

29012 
<<SMGSSMASK_ADR-U.614>-4> 
511 

-1 

29013 


AX=11 Bliss-32 V4.0-74 
SMGRTL.SRCISMGSTRTAB.B352; 1 
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SAGSSTRING, TABL 
1-00 


TPARSE tables for string capabilities 
CONVERT_CONTROL = Convert “* to control characte 1 


00000200 
FFFF 
7156 

00000000* 

00000201 
FFFF 
7157 

00000000* 

00000202 
FFFF 
7158 

00000000* 

00000203 
FFFF 
7159 

00000000* 

00000204 
FFFF 
715A 

00000000* 

00000205 
FFFF 
7158 

00000000* 

00000206 
FFFF 
715C 

00000000* 


M11 


1eSep-1986 §5:40:06 


U.621: .LONG 
00416 ; TPASMASK 
U.622:  .LONG 
O041A ; TPASTARGET 
U.623:  .WORD 
0041C A Mle 
U.627: .WORD 
OO41E ; TPASADDR 
U.628: .LONG 
00422 ; TPASMASK 
U.629: .LONG 
00426 p TEQSTARGET 
U.630: .WOR 
00428 ; TPASTYPE 
U.634: .WORD 
0042A ; TPASADDR 
U.635: . LONG 
0042E ; TPASMASK 
U.636: .LONG 
00432 ; TPASTARGET 
U.637:  .WORD 
00434 ; TPASTYPE 
U.641: WORD 
00436 ; TPASADDR 
U.642: .LONG 
0043A ; TPASMASK 
U.643: .LONG 
0043E ; TPASTARGET 
U.644: .WORD 
00440 ; TPASTYPE 
U.648: .WORD 
00442 ; TPASADDR 
U.649: LONG 
00446 ; TPASMASK 
U.650: . LONG 
0044A ; TPASTARGET 
U.651:  .WORD 
0044C ; TPASTYPE 
U.655: .WORD 
0044E ; TPASADDR 
U.656: LONG 
00452 ; TPASMASK 
U.657: . LONG 
00456 sTBABTARGET” 
00458 preagtvee 
U.662: .WORD 
0045A We aaa 
U.663: .LONG 
0045E ; TPASMASK 
U.664: .LONG 
00462 preagranes! 
U.665:  .WORD 
00464 ; TPASTYPE 
U.669: .WORD 
00466 ;TPA ADDR 


U.670: .LONG 


512 
1 
29014 


<<SMGSSMASK_ADR-U.628>-4> 


513 
1 
29015 


<<SMGSSMASK_ADR-U.635>-4> 


514 
-1 
29016 


<<SMGSSMASK_ADR-U.642>=4> 


515 
ad 
29017 


<<SMGSSMASK_ADR-U.649>-4> 


516 
-1 
29018 


<<SMGSSMASK_ADR-U.656>-4> 


517 
-1 
29019 


<<SMGSSMASK_ADR-U.663>-4> 


518 
-1 
29020 


AX-11 Bi ies -32 V4.0-7 
SMGRTL. SRC} SMGSTRTAB. ; 231 


<<SMGSSMASK_ADR=U.621>-4> 


<<SMGSSMASK_ADR-U.670>-4> 


5 Mahan hie 
1-00 


TPARSE tables for string capabilities 


CONVERT_CONTROL = Convert “* to control characte 1 


00000207 
FFFF 
715D 

00000000* 

00000208 
FFFF 
715E 

00000000* 

00000209 
FFFF 
715F 

00000000* 

0000020A 
FFFF 
7160 

00000000* 

00000208 
FFFF 
7161 

00000000* 

0000020C 
FFFF 
7162 

00000000* 

00000200 
FFFF 
7163 

00000000* 

0000020E 


N11 
16-Sep-1984 5 AX-11 Bliss-32 V 
4-Sep- 71386 93 §: a2 SMGRTL.SRC SMGSTRIAB. yf 2;1 
0046A ; TPASMASK 
U.671:- .LONG 519 
Q0046E ; TPASTARGET 
U.672: WORD 1 
00470 ;TPA TYPE 
U.676: .WORD 29021 
00472 z TOASADOR 
U.677: .LONG <<SMGSSMASK_ADR-U.677>-4> 
00476 pTCoanAae 
U.678: .LONG 520 
0047A greg ramen | 
U.679: WORD 1 
0047C ; TPASTYPE 
U.683: .WORD 29022 
0047E ;TPASADDR 
U.684: .LONG <<SMGSSMASK_ADR-U.684>-4> 
00482 ; TPASMASK 
U.685: .LONG 521 
00486 ; TPASTARGET 
U.686: .WORD -1 
00488 ; TPASTYPE 
U.690: .WORD 29023 
0048A ; TPASADOR 
U.691: .LONG <<SMGSS$MASK_ADR-U.691>-4> 
0048E ; TPASMASK 
U.692: .LONG 522 
00492 ; TPASTARGET 
U.693: .WORD -1 
00494 ; TPASTYPE 
U.697: .WORD 29024 
00496 ; TPASADDR 
U.698: .LONG <<SMGSSMASK_ADR-U.698>-4> 
0049A ; TPASMASK 
U.699: .LONG 523 
0049E  TPASTARGET 
U.700: .WO -1 
Q04A0 ; TPASTYPE 
U.704: .WOR 29025 
004A2 ; TPASADDR 
U.705: .LONG <<SMGSSMASK_ADR-U.705>-4> 
004A6 ; TPASMASK 
U.706: .LONG 524 
OO4AA ; TPASTARGET 
U.707: WORD -1 
OO4AC ; TPASTYPE 
U.711: WORD 29026 
OO4AE ; TPASADOR 
U.712: .LONG <<SMGSS$MASK_ADR-U.712>-4> 
004B2 I OAgRASK 
U.71 LONG 525 
004B6 ; TPASTARGET 
714: WORD <1 


00488 ; TPA TYPE 
1 . WORD 
004BA ; TPASADDR ~™ 


b. 
004BE | TPASMASK 


29027 
<<SMGSSMASK_ADR-U.719>=4> 


SMGSSTRING_TABL ioaue 
1-00 CONV 


or string capabilities 
“to control characte | 


FFFF 
7164 
00000000* 
0000020F 
FFFF 
7165 
00000000* 
00000210 
FFFF 
7166 
00000000* 
00000211 
FFFF 
7167 
00000000* 
00000212 
FFFF 
7168 
00000000* 
00000213 
FFFF 
7169 
00000000* 
00000214 
FFFF 
716A 
00000000* 
00000215 


004C2 
004C4 ; 
004(6 
O04CA 
004CE 
00400 
0042 


00406 ; 


004DA 
0040¢ 
004DE 
004E2 
004E6 
004E8 
QO4EA 
O04EE 
004F2 
004F4 
004F6 
OO4FA 
OO4FE 
00500 
00502 
00506 
QO50A 
0050¢ 
0050E 
00512 


U.720: ,LONG 
Me Heo 


+b TYPE 


=--> 
> 9 
“oo go 

Zz 


> 
so -< 
so v 
ze 


= 
> 
mn 
xe 


oo ajce —g 
<= > 
wv wD 
me @ 

m 
4 


Pd 
> 9 
=] 
zz 


4 
> 
aw 
ar x 
m 
~ 


>frt>yt>y PSUS USNS ASS WSS WSS 
_T 
vw 
e Tie 


Sage ee bo ee ae ae hoe oe ee oe ee ane ee ee 


= 

> 

wn” 
. 


>-- 
oso -< 
aoe wv 
ye De rie 


oe “Bee 
> 


1S Bep-1964 01:29:38 


AX=11 Bliss-32 V 
SMGRTL.SRC SMGSTR 
526 
-1 
29028 


<<SMGSSMASK_ADR=-U.726>-4> 
527 

-1 

29029 
<<SMGSSMASK_ADR-U.733>-4> 
528 

-1 

29030 
<<SMGSSMASK_ADR=U.740>-4> 
529 

-1 

29031 
<<SMGSSMASK_ADR=U.747>=4> 
530 

-1 

29032 
<<SMGSSMASK_ADR-U.754>-4> 
531 

=| 

29033 
<<SMGSSMASK_ADR-U.761>-4> 
532 

-1 

29034 

<<SMGSSMASK_ADR-U. 768>-4> 
533 


RiAB B92: 


74 
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Sm 


5 Naa bla T 
1-00 


PARSE tables for string capabilities 


CONVERT_CONTROL = Convert “ 


FFFF 
7168 
00000000* 
00000216 
FFFF 
716C 
00000000* 
00000217 
FFFF 
716D 
00000000* 
00000218 
FFFF 
716E 
00000000* 
00000219 
FFFF 
716F 
00000000* 
0000021A 
FFFF 
7170 
00000000* 
00000218 
FFFF 
7171 
00000000* 
0000021C 
FFFF 


to control characte 1 


00516 
00518 
QOS1A 
OOS1E 
00522 
00524 
00526 
0052A 
0052E 
00530 
00532 
00536 
0053A 
0053¢ 
0053E 
00542 
00546 
00548 
Q054A 
0054E 
00552 
00554 
00556 
0055A 
0055E 
00560 
00562 
00566 
0056A 


Ns 


12 


Sep-19B4 19:10:06 


; TPASTARGET 
U.770: WORD 
; TPASTYPE 
U.774: WORD 
We unae 
U.775: . LONG 
; TPASMASK 
U.776: . LONG 
ae Meade! 
U.777: WORD 
; TPASTYPE 
U.781: WORD 
; TPASADDR 
U.782: .LONG 
MS pee 
U.783: .LONG 
: TPASTARGET 
U.784: WORD 
; TPASTYPE 
U.788: . WORD 
; TPASADDR 
U.789: .LONG 
; TPASMASK 
U.790: .LONG 
; TPASTARGET 
U.791: WORD 
3; TPASTYPE 
U.795: . WORD 
3; TPASADDR 
U.796: .LONG 
3; TPASMASK 
U.797: .LONG 
; TPASTARGET 
U.798:  . WORD 
; TPASTYPE 
U.802: .WORD 
; TPASADDR 
U.803: .LONG 
3; TPASMASK 
U.804: .LONG 
; TPASTARGET 
U.805: .WORD 
; TPASTYPE 
U.809: .WORD 
3; TPASADDR 
U.810: .LONG 
; TPASMASK 
U.811:  . LONG 
3; TPASTARGET 
UsBle: » WORD 
; TPASTYPE 
U.816:  . WORD 
AS ee 
U.817: .LONG 
A BARRASE 
U.818: . LONG 
; TPASTARGET 


AX-11 B 


29035 


<<SMGSSMASK_ADR=U.775>=4> 


534 
-1 
29036 


<<SMGSSMASK_ADR=-U. 782>-4> 


535 
1 
29037 


<<SMGS$MASK_ADR=-U. 789>=4> 


536 
-1 
29038 


<<SMGSSMASK_ADR-U.796>-4> 


537 
o1 
29039 


<<SMGSSMASK _ADR-U.803>-4> 


538 
1 
29040 


<<SMGSSMASK_ADR-U.810>-4> 


539 
@1 
29041 


<<SMGSSMASK_ADR-U.817>-4> 


540 


Bliss-32 V4.0-7 
SMGRTL.SRCJSMGSTRTAB. 4 2:1 
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SMGSSTRING_TABL haat teBNTR 
1-00 CONVERT 


for string capabilities 
= Convert * to control characte 1 


7172 
00000000* 
00000210 

FFFF 

7173 
00000000* 
0000021E 

FFFF 

7174 
00000000* 
0000021F 

FFFF 

7175 
00000000* 
00000220 

FFFF 

7176 
00000000* 
00000221 

FFFF 

7177 
00000000* 
00000222 

FFFF 

7178 
00000000* 
00000223 

FFFF 


ri 


0056C ; 
0056E ; 
00572 ; 
00576 ; 
00578 ; 
0057A ;i 
0057E ;f 
00582 ;7 
00584 ;1 
00586 ;T 
0058A ;1 
O058E ; 
00590 ;1 
00592 ;7 
00596 ;T 
0059A ;T 
0059¢ ;f 
0059 ;T 
005A2 ;T 
005A6 ; 
0058 ;T 
OOSAA ;1 
OOSAE ;1 
00582 ; 
005B4 ;7 
00586 ; 
005BA ; 
00SBE ;1 
86 


“1386 P4:46ide — HehcateOSkeSsaes yee ke 


-1 
29042 
<<SMGSSMASK_ADR-U.824>-4> 
541 
-1 
29043 
<<SMGSSMASK_ADR-U.831>=4> 
542 
-1 
29044 
<<SMGSSMASK_ADR-U.838>-4> 
543 
=i 
29045 
<<SMGSSMASK_ADR-U.845>-4> 
544 
<1 
29046 
<<SMGS$MASK_ADR-l!.852>-4> 
545 
-1 
29047 
<<SMGSSMASK_ADR-U.859>-4> 
546 
-1 
29048 
<<SMGSSMASK_ADR-U.866>-4> 
547 
-1 


Cesecesee 


12 
SMGSSTRING_TABL het tables for string capabilities 1-5 ep-1984 
1-00 CONVERT_CONT ROL - Convert apo control characte 13: 238-1384 9}: 6; 3 


7179 =005C0 te 


AX-11 a? Leqeze v4 
SMGRTL.S eSsmes trina. 3 2;1 


00000000* 005¢2 PP esas) ctaees 
00000224 005¢6 ; 
FFFF OOSCA ;T 
717A O05CC 


LONG <<SMGSSMASK_ADR-U.873>-4> 
LONG 548 

.WORD <1 

WORD 29050 


ee ey i: AOR ONG <<SMGSS$MASK_ADR=-U.880>-4 
° 2 -U. >-4> 
00000225 00502 ; TPASMASK 3 
U. -LONG 549 
FFFF 00506 ¥y TARGE 
717B 00508 ; TPASTYPE 
U. : .WORD 29051 
00000000* O05DA ; TPASADDR 
U. ~ LONG <<SMGSSMASK_ADR-U.887>-4> 
00000226 OO0SDE ;T SK 
U. -LONG 550 
FFFF OOSE2 ;T TARGET 


7 
TPA 
7 
A 
7 
A 
7 
A 
7 
A 
8 
A 
81: 
A 
8 
A 
8 
A 
8 
8 
A 
~WORD -1 

A 

9 

A 

9 


$ 

$ 

0 

$ 

1 

$ T 
2: .WORD <1 
$ 

6 

$ 

7 

8 

$ 

$ 

3 

$ 

4 

$ 


717C O0OSE4 ;T TYPE 
U. : ,WORD 29052 
00000000* 005E6 ; TPASADDR 
U. : LONG <<SMGSSMASK_ADR-U.894>-4> 
00000227 OOSEA ; TPASMASK 
U.895: .LONG 551 
FFFF OOSEE ; TPASTARGET 
U.896: .WORD -1 
717D OOSFO ; TPASTYPE 
U.900: .WORD 29053 
00000000* 005F2 


<<SMGSSMASK_ADR-U.901>=4> 


00000248 005F6 ; TPASMASK 
0.902: .LONG 587 
FFFF OOSFA it STARGET 
717E O0S5FC i $TYPE 


7: ,¥ono 29054 
<<SMGSSMASK_ADR-U.908>-4> 


00000000* OOSFE 


00000228 00602 ;T K 
U.909: .LONG 552 
FFFF 00606 ; TPASTARGET 
U.910: WORD -1 
717F 00608 ; TPASTYPE 
U.914: WORD 29055 
00000000* 0060A ;T oe , 
U.915: .LONG <<SMGSSMASK_ADR-U.915>-4> 
00000229 O060E ; TPASMASK 
U.916:  .LONG 553 
FFFF 00612 ; TPASTARGET 
P : ,WORD -=1 
7180 00614 ; TPASTYPE 
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ergng TRINS TABL T 
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PARSE tables for string capabilities “Se AX-11 Bliss-32 V4.0- 
CONVERT_CONTROL = Convert * to control characte 1 12=86P-} 38 9}: #6: 3a SMGRTL.SR ReishesYRige B32;1 
U.921: .WORD 29056 
tence estat iiss MOR ONG <SMGSSMASK_ADR-U.922>-4 
‘ i 4 < “U.922>-4> 
0000022A O061A ; TPASMASK a 
U.923: .LONG 554 
FFFF OO61E ; TPASTARGET 
U.924: WORD ~=1 
7181 00620 A a 29057 
00000000* 00622 ; TPASADDR 
U.929: .LONG <<SMGSSMASK_ADR-U.929>-4> 
0000022B 00626 BTS gRRASE 
U.930: .LONG 555 
FFF O0062A ; TPASTARGET 
U.931: .WORD -1 
7182 0062C proag ire 
U.935: .WORD 29058 
00000000* 0062E ; TPASADDR 
U.936: .LONG <<SMGSSMASK_ADR-U.936>-4> 
0000022C 00632 ; TPASMASK 
U.937: .LONG 556 
FFFF 00636 ; TPASTARGET 
U.938: .WORD -1 
7183 00638 ; TPASTYPE 
U.942: .WORD 29059 
00000000* 0063A ; TPASADDR 
U.943: .LONG <<SMGSSMASK_ADR=-U.943>-4> 
0000022D O063E ; TPASMASK 
U.944: LL 557 
FFFF 00642 We Hap 
U.945: . -1 
7184 00644 ; TPASTYPE 
U.949: .WORD 29060 
00000000* 00646 ; TPASADDR 
U.950: .LONG <<SMGSS$MASK_ADR-U.950>-4> 
00000248 0064A ; TPASMASK 
U.951: .LONG 584 
FFFF QO64E ; TPASTARGET 
U.952: .WORD -1 
7185 00650 ; TPASTYPE 
U.956: .WORD 29061 
00000000* 00652 ; TPASADDR 
U.957: . LONG <<SMGSSMASK_ADR-U.957>-4> 
0000022E 00656 ATpRRAsA 
U.958: .LONG 558 
FFFF OO65A ; TPASTARGET 
U.959: .WORD -1 
7186 0065C prog. vee 
U.963: .WORD 29062 
00000000* 0065E ; TPASADDR 
U.964: .LONG <<SMGSSMASK _ADR=-U.964>-4> 
00000252 00662 ; TPASMASK 
U.965: .LONG 594 
FFFF 00666 ; TPASTARGET 
U.966: .WORD -1 
7187 00668 ; TPASTYP 
0.970: .WORD 29063 


SAGRS TRING TABL TPARSE tables for string capabilities 18-56 “Sep 07 138% 91: + 33 AX-11 BLi dagcce vest a eh: 4 


CONVERT_CONTROL = Convert * to control characte 14-Sep-1 SMGRTL” SRC 
ee a hee ONG <<SMGSSMASK_ADR-U.971>-4 
= -U. >-4> 
0000022F O066E ;TPA MA SK s 
U.972: .LONG 559 
FFFF 00672 Via TARGET 
0.973: .WORD -1 
7188 00674 ; sipAsivee 
97 eWORD 29064 
heer vgs i SiO <<SMGSSMASK_ADR-U.978>=4 
. -U. >=-4> 
00000230 0067A ; TPASMASK =a 
U.979: .LONG 560 
FFFF QO67E ; TPASTARGET 
Hest t -WORD =1 
7189 00680 ; TPASTYPE 
U.984: .WORD 29065 
noses cata 968s. Lone <SMGSSMASK_ADR=-U.985>-4 
. —— < "VU. >-4> 
00000231 00686 ; TPASMASK - 
U.986: .LONG 561 
FFFF OO68A ; TPASTARGET 
U.987: . -1 
718A O068C ; TPASTYPE 
U.991: .WORD 29066 
00000000* O068E ; TPASADDR 
U.992: .LONG <<SMGSSMASK_ADR=-U.992>-4> 
00000232 00692 U998 0 aL 
U 99 562 
FFFF 00696 ; TPASTARGET 
U.994:  .WORD -1 
718B 00698 ; TPASTYPE 
U.998: .WORD 29067 
00000000* 0069A ; TPASADDR 
U.999: .LONG <<SMGSSMASK_ADR-U.999>=4> 
00000233 O069E ; TPASMASK 
U.1000: .LONG 563 
FFFF QO6A2 ; TPASTARGET 
U.1001: .WORD -1 
718C O06A4 ; TPASTYPE 
U.1005: .WORD 29068 
00000000* 006A6 ; TPASADDR 
U.1006: .LONG <<SMGSSMASK_ADR-U.1006>-4> 
00000234 O06AA ; TPASMASK 
U.1007: .LONG 564 
FFFF QO6AE ; TPASTARGET 
U.1008: .WORD -1 
7180 00680 ; TPASTYPE 
U.1012: .WORD 29069 
00000000* 00682 ; TPASADDR 
U.1013: .LONG <<SMGSSMASK_ADR-U.1013>-4> 
00000235 00686 ; TPASMASK 
U.1014: .LONG 565 
FFFF QO6BA ; TPASTARGET 
U.1015: .WORD -1 
718E OO6BC ; TPASTYPE 
U.1019: .WORD 29070 
00000000* O06BE ; TPASADDR 


~ 
, 
~o 


H 1 
SPGSSTRING. TABL TPARSE tables for string capabilities $ 
CONVE -$ 


AX-11 Bliss-32 V4.0-74 
RT_CONTROL = Convert * to control characte 1 


71382 93; 6: 32 SMGRTL.SRCJSMGSTRTAB.B52; 1 
: .LONG <<SMGSSMASK_ADR-U.1020>-4> 


00000236 006C2 ;T 
: .LONG 566 


Us 
FFFF Q06C6 ; 


1 


718F 006C8 ; 
29071 
00000000* 006CA ; 
<<SMGSSMASK_ADR=U.1027>-4> 
00000237 O06CE ; al 
FFFF 006D2 ; 1 
7190 006D4 ; 
29072 
00000000 00606 ; 
<<SMGSSMASK_ADR=-U.1034>=4> 
00000238 O06DA ; 
. 568 
FFFF QO6DE ; , 
7191 006E0 ; 
29073 
00000000* 006E2 ; 
<<SMGSSMASK_ADR-U.1041>-4> 
00000239 006E6 ; 
569 
FFFF OO6EA ; , 
7192 O06EC ; 
. 29074 
00000000* O06EE ; 
. <<SMGSS$MASK_ADR-U. 1048>=4> 
0000023A 006F2 ; 
570 
FFFF O06F6 ; 
7193 006F8 i; 
29075 
00000000* OO6FA ; 
<<SMGSS$MASK_ADR-U.1055>-4> 
00000238 O06FE ; = 
FFFF 00702 ;T 
7194 00704 ;7 
00000000* 00706 sli 
<<SMGSSMASK_ADR-U.1062>-4> 
0000023C 0070A ; ant 
FFFF OO7OE ; ; 
7195 00710 ;T 
29077 
00000000 


00712 ;T 
U 


<<SMGSSMASK_ADR-U. 1069>=4> 


SAGSSTRING_TABL 


s for string capabilities 
CONVERT “CONT ROL = Convert * to control characte 1 


00000230 
FFFF 
7196 

00000000* 

0000023E 
FFFF 
7197 

00000000* 

0000023F 
FFFF 
7198 

00000000* 

00000240 
FFFF 
7199 

00000000* 

0000024E 
FFFF 
719A 

00000000* 

00000241 
FFFF 
7198 

00000000* 

00000242 
FFFF 
719C 

00000000* 

00000243 


1-0-1984 1:28:55 yaett BLiege32 ve.e743. 


00716 ;TPA eae 


0.10 LONG 
OO71A ;TPABTARGET 
U.1071: .WORD 
0071C p TRAST YPE 
U.1075: WORD 
OO71E MY ete 
U.1076: .LONG 
00722 ; TPASMASK 
U.1077: .LONG 
00726 ; TPASTARGET 
U.1078: .WORD 
00728 att tie 
U.1082: .WORD 
0072A ; TPASADDR 
U.1083: .LONG 
0072E ; TPASMASK 
U.1084: .LONG 
00732 ; TPASTARGET 
U.1085: .WORD 
00734 ;TPASTYPE 
U.1089: .WORD 
00736 ; TPASADDR 
U.1090: .LONG 
0073A ; TPASMASK 
U.1091: .LONG 
OO73E ; TPASTARGET 
U.1092: .WORD 
00740 ; TPASTYPE 
U.1096: .WORD 
00742 ; TPASADDR 
U.1097: .LONG 
00746 ; TPASMASK 
U.1098: .LONG 
0074A ; TPASTARGET 
U.1099: .WORD 
0074C ; TPASTYPE 
U.1103: .WORD 
0074E ; TPASADDR 
U.1104: .LONG 
00752 ; TPASMASK 
U.1105: .LONG 
00756 ; TPASTARGET 
U.1106: .WORD 
00758 ; TPASTYPE 
U.1110: .WORD 
0075A ; TPASADDR 
U.1111: LONG 
0075E ; TPASMASK 
U.1112: .LONG 
00762 ; TPASTARGET 
U.1113: .WORD 
00764 ; TPASTYPE 
U.1117: .WORD 
00766 ; TPASADDR 
U.1118: LONG 
0076A ; TPASMASK 


573 

-1 

29078 
<<SMGSSMASK_ADR=-U.1076>-4> 
574 

1 

29079 
<<SMGSSMASK_ADR-U.1083>-4> 
575 

-1 

29080 
<<SMGSSMASK_ADR=-U.1090>-4> 
576 

-1 

29081 
<<SMGSSMASK_ADR-U.1097>-4> 
590 

-1 

29082 
<<SMGSSMASK_ADR-U.1104>-4> 
577 

-1 

29083 
<<SMGSSMASK_ADR-U.1111>=4> 
578 

-1 

29084 
<<SMGSSMASK_ADR-U.1118>-4> 
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a CONVERT CONTROL vathan apo control characte 14-Sep-1984 oy: 6; 32 SMGRTL.SR RO} 


U.1119: .LONG 579 
er ee ites. tang. oad 
hiviecitd )\ ip 
seen: arid git aOR ONG <<SMGSSMASK_ADR-U.1125>-4> 
00000244 00776 ATPASBASK a0 
ibdeahlen by rub ee 
rayE Orr ATT Pe onD 29086 
encemer i ihte Bt eoO OR ons <<SMGSSMASK_ADR-U.1132>-4> 
ee eee AON ieee ae 
ita retin, 65 rae 
rae eres i etShs cwoRD 29087 
sapere pues Art eoOPF one <<SMGSSMASK_ADR-U.1139>-4> 
Hoenn tore AT tEOr LONG 581 
iment ae 
0.1145: .WORD 29088 
ceieoachie sae Ba teee Fons <<SMGS$MASK_ADR-U.1146>-4> 
00000246 0079A ; TRASHASK mek ae 
mn oe tiene 
0.1152: .WwORD 29089 
sceptics” <tetes MAL rene <<SMGSSMASK_ADR-U.1153>-4> 
wooomedindiog \\iine tee. 
ie psetenl re  PF 
rane ern EET Eon 29090 
soda > paket Mitre <<SMGSSMASK_ADR-U.1160>=4> 
suvctveted *\ inet oe 
tome teem = 
0.1166: .WORD 29091 
accent Mbit <<SMGSSMASK_ADR-U.1167>=4> 
tacos inched ¥ 1! ye 


SRgSS TRING. TABL 


2 fer string capabilities 


to control characte 1 


FFFE 
71A4 
00000000* 
0000028E 
FFFF 
71A5 
00000000* 
0000028F 
FFFF 
71A6 
00000000* 
00000290 
FFFF 
71A7 
00000000* 
00000291 
FFFF 
71A8 
00000000* 
00000292 
FFFF 
71A9 
00000000* 
00000293 
FFFF 
71AA 
00000000* 
00000294 
FFFF 


007¢2 
eohed | 
007¢6 ; 
vaghead 
oo7ce ; 
00700 
0072 
00706 
007DA 
0070C 
007DE 
007E2 
JO7TE6 ; 
007E8 
OO7EA 
OO7EE 
007F2 
007F4 
007F6 
OO7FA 
OO7FE 
00800 
00802 ; 
00806 
0080A 
0080C 
0080E 
00812 
00816 ; 


S198 91:95:8 


; TPASTARGET 
21169: ,WORD 
he 


oe Fees CO ce ice eee eee See eee 
oovrnweiodgo@iv 
we me Ge Ke wD 
m 
= 


~< 
Me he 
= 


oe eee Oee 
”o oOo FV 
o 


oe Oe 
J 
Po) 


AX-11 Bliss-32 V4.0-7 


-1 

29092 
<<SMGSSMASK_ADR=U.1174>-4> 
654 

<1 

29093 
<<SMGSSMASK_ADR=U.1181>=4> 
655 

-1 

29094 
<<SMGSSMASK_ADR-U.1188>-4> 
656 

-1 

29095 
<<SMGSSMASK_ADR-U.1195>=4> 
657 

-1 

29096 
<<SMGSSMASK_ADR-U.1202>-4> 
658 

-1 

29097 
<<SMGSSMASK_ADR=-U.1209>-4> 
659 

-1 

29098 
<<SMGSSMASK_ADR-U.1216>-4> 
660 


SMGRTL.SRCIJSMGSTRTAB. : 231 
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15F6 
FFFE 


99F8 
0000+ 
00000000* 
0000+ 
9030 
00000000* 
0000+ 
81F1 
00000000* 
85ED 
00000000* 


99F8 
0000* 
00000000* 
0000* 
19F8 
0000+ 
0000+ 
81F1 
00000000* 
85ED 
00000000* 


902C 
00000000* 


00818 
OO81A 
0081C 
0081¢ 
0081E 
00820 
00824 
00826 
00828 
0082C 
0082E 
00830 
00834 
00836 
0083A 
0083A 
0083¢ 
0083E 
00842 
00844 
00846 
00848 
0084A 
0084¢ 
00850 
00852 


00836 


to control characte 12: -Sep-1 


12 
1$- -Sep-1984 AX-11 Bliss-32 V4.0-74 
382 9}: 6; 3 SMGRTL.SRCJSMGSTRTAB.B32; 1 
U.1218: .WORD -1 
; TPASTYPE 
U.1219: .WORD 5622 
pre SsAnee! 
U.1220: .WORD -2 
ZEQUALS STRING 
U.2?: .-BLKB 
s TPASTYPE 
U.1222: .WORD -26120 
TPA Hae 
U.1223: .WORD <<U.3-U.1223>-2> 
; TPASACTION 
U.1224: .LONG <<SMGSSNEXT_RECORD=-U.1224>-4> 
Abt taal A 
U.1225: .WORD <<U.27-U.1225>-2> 
sreasyyre 
U.1226: .WORD -28611 
p TPASACTION 
U.1227: .LONG <<SMG$$STORE_CAP_MASK=U.1227>-4> 
3; TPASTARGET 
U.1229: .WORD <<U.1228-U.1229>-2> 
s TPASTYPE 
U.1230: .WORD -32271 
3; TPASACTION 
U.1231: LONG <<SMGSS$SYNTAX_ERROR-U.1231>-4> 
A a 
U.1232: .WORD -31251 
3; TPASACTION 
U.1233: .LONG <<SMGSS$SYNTAX_ERROR-U.1233>-4> 
;STRING_ CAP VALUE 
U.1228:~ .BLR 
Na ie 
U.1234: .WORD -26120 
3 TPASSUBE XP 
U.1235: .WORD <<U.3-U.1235>-2> 
3; TPASACTION 
U.1236: .LONG <<SMGSSNEXT_RECORD-U.1236>-4> 
A ae A 
U.1237: .WORD <<U.1228-U.1237>-2> 
peoga vee 
U.1238: .WORD 6648 
pORP RUSE MP 
U.1240: .WORD <<U.1239-U.1240>-2> 
; TPASTARGET 
U.1241: .WORD <<BEGIN_SCAN-U.1241>-2> 
3; TPASTYPE 
U.1242: .WORD <-32271 
; TPASACTION 
U.1243: LONG <<SMGSS$SYNTAX_ERROR-U.1243>-4> 
; TPASTYPE 
U.1244: .WORD -31251 
; TPASACTION 
U.1245: .LONG <<SMGSS$SSYNTAX_ERROR-U.1245>-4> 
COMMA: pgotke 0 
s TPASTY 
U. aE E oRD -28628 


SHGSSTRING, TABL 
1-00 


TPARSE tables for string capabilities 
CONVERT_CONTROL = Convert “ 
FFFF 

91F2 
00000000* 
0000+ 

99F8 
0000* 
00000000* 

FFFF 

85ED 
00000000* 


9027 
00000000* 
0000* 
9022 
00000000* 
0000* 
15€D 
FFFE 


19F8 
0000* 
0000+ 
9024 
00000000Vv 
0000+ 
19F8 
0000* 


to control characte 


M12 
16-Sep-1984 2:22:35 
1 730071383 94:98:32 
U.1247: LONG 
0085¢ TPASTARGET 
0085€ {TPASTVPE 
00860 ATRSBACTION 
00864  TPABTARGET 
sae A 
00868 ; teas UBEXP 
0086A ;TPASACTION 
0086E ZTPASTARGET 
00870 jTPASTYPE 
00872 ZTPASACTION 
00876 :S7RING_CAF 
00876 ;TPASTYPE 
00878 ,TPASACTION 
0087¢ ;TPASTARGET 
0087E ZTPASTYPE 
00880 ;TPASACTION 
00884 ;TPASTARGET 
6.1265: .WORD 
086 6 FAEE Eon 
00888 ; TPASTARGET 
U.1267: .WO 
0088A s SINGLE 
0.12460: 7.BL 
0088A ZTPASTYPE 
0088C TFASSUBEKP. 
OO88E ; TPASTARGET 
0.1271: .WORD 
00890 TPASIYPE 
o88e Ta CNG 
00896 ;TPASTARGET 
—— At Meee 
0089A ; TPASSUBEXP 
6.1277: . WORD 


AX-11 Bliss-32 V4.0-74 


<<SMGSSBLANKS_OF F-U.1247>-4> 
-1 

-28174 

<<SMGSSBLANKS_OF F-U.1250>-4> 
<<COMMA=U.1251>=2> 

-26120 

<<U.3*U.1253>-2> 
<<SMGSSNEXT_RECORD-U.1254>=4> 
-1 

-31251 
<<SMGS$SYNTAX_ERROR=U.1257>=4> 
0 

-28633 
<<SMGSSBLANKS_ON-U.1259>-4> 
<<U.1260-U.1261>-2> 

-28638 

<<SMGSSBLANKS _ON-U.1263>-4> 
<<U.1264-U.1265>-2> 

5613 


WORD =-2 
UOTE STRING 
-BLKB 0 


6648 

<<U.1269-U.1270>-2> 
<<U.1260-U.1271>-2> 

-28636 
<<CONVERT_ESCAPE-U.1273>-4> 
<<U.1260-U.1274>-2> 

6648 

<<U.1276-U.1277>-2> 


SMGRTL.SRCJSMGSTRTAB.B52; 1 
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S$ 
1 


5 i 
1-00 


TPARSE tables for string capabilities 
CONVERT_CONTROL = Convert * 


to contro 


0000* 
19F8 
0000+ 
0000+ 
19F8 
0000* 
0000* 
9027 
00000000* 
0000* 
91F2 
00000000* 
0000* 
8022 
00000000* 
91ED 
00000000* 
0000+ 
15F6 
FFFF 


19F8 
0000+ 
0000* 
9024 
00000000v 
0000* 
19F8 
0000* 


0089¢ 


0089E ; ; 


008A0 
008A2 
008A4 
008A6 
008A8 
OO8AA 
0O8AC 
00880 
00882 ; 
00884 
00888 
008BA 
008BC 
008C0 
008C2 ; 
008C6 ; 
008¢8 
OO8CA 
OO8CC ; 
008cc 
008CE 
00800 
00802 
00804 
00808 
QO8DA 
0080C ; 


l characte 12 sep-196 94 6: a2 


ait a 


97 

$ 

9 

$ 

99: 

B 

6 LK 
; TPASTYP 
U.1300: .WORD 
; TPASSUBEXP 
U.1301: .WORD 
3; TPASTARGET 
U.1302: .WORD 
; TPASTYPE 
U.1303: .WORD 
3; TPASACTION 
U.1304: .LONG 

TPASTARGET 


o 


$SUBE XP 


AX-11 Bliss-32 


PY els 
SMGRTL.SRCJSMGSTRTAB.B52;1 


<<U.1260-U.1278>-2> 

6648 

<<U.1280-U. 1281>-2> 

<<U.1260-U. 1282>-2> 

6648 

<<U.1284-U.1285>-2> 

<<U.1260-U. 1286>-2> 

-28633 

<<SMGS$SCOPY_CAP-U.1288>-4> 
<<COMMA-U.1289>=2> 

-28174 
<<SMGSSSAVE_TOKEN_STRING-U.1291>=4> 
<<U.1260-U.1292>-2> 

-32734 
<<SMGSSSYNTAX_ERROR-U.1294>-4> 
-28179 
<<SMGSSSAVE_TOKEN_STRING=-U.1296>=4> 
<<U.1260-U. 1297>-2> 

5622 


> | 
ye. QuoTe STRING 
B™ 0 


6648 

<<U.1269-U.1301>-2> 
<<U.1264-U.1302>-2> 

-28636 
<<CONVERT_ESCAPE-U.1304>-4> 
<<U.1264-U.1305>-2> 

6648 
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SP58 TRING_TABL Hata 5 tables for string capabilities 


NVERT_CONTROL = Convert “* to control characte 


0000+ 
19F8 
0000+ 
0000+ 
19F8 
0000+ 
0000+ 
9022 
00000000* 
0000+ 
91F2 
00000000+ 
0000* 
8027 
00000000* 
91ED 
00000000* 
0000+ 
15F6 
FFFF 


105F 
0000+ 
15F6 
FFFE 


9024 
00000000v 


° 13 
16-Sep-1 
14-Sep-19 
U.1307: .WORD 
OOBDE ; TPASTARGET 
U.1308: .WORD 
008E0 pTEgRIVPE 
U.1309: .WORD 
008E2 p TE GPRUBEXE 
U.1310: .WORD 
D08E4 ; TPASTARGET 
U.1311: .WORD 
OOBE6 ; TPASTYPE 
U.1312: .WORD 
008E8 WLS t atts 
U.1315: .WORD 
OO8EA ; TPASTARGET 
U.1314: .WORD 
OOBEC ; TPASTYPE 
U.1315: .WORD 
OOBEE ; TPASACTION 
U.1316: .LONG 
OOB8F2 ; TPASTARGET 
U.1317: .WORD 
OO8F4 ; TPASTYPE 
U.1318: .WORD 
OO8F6 ; TPASACTION 
U.1319: .LONG 
OOBFA ; TPASTARGET 
U.1320: .WORD 
OOBFC ; TPASTYPE 
U.1321: .WORD 
OOBFE ; TPASACTION 
U.1322: .LONG 
00902 ; TPASTYPE 
U.1323: .WORD 
00904 ; TPASACTION 
U.1324: .LONG 
00908 ; TPASTARGET 
U.1325: .WORD 
O090A ; TPASTYPE 
U.1326: .WORD 
0090C ; TPASTARGET 
U.1327: .WORD 
QO90E ;UNDERSCORE 
U.1269: .BLKB 
0090E p THAR TYPE 
U.1328: .WORD 
00910 ; TPASTARGET 
U.1330: .WORD 
00912 pregey re 
U.1331: .WORD 
00914 pe ORyAnee 
U.1332: .WORD 
00916 UND RSCORE2 
U.1529: .BLKB 
00916 ;TPA {vPe 
Us\3 : WORD 
00918 ; a1} redbte 
U.1334: . 


9B 15:96:00 


AX-11 Bliss-32 V 
SMGRTL.SRCJSM st READ. 3 2;1 


<<U.1276-U.1307>-2> 
<<U.1264-U.1308>-2> 

6648 

<<U.1280-U.1310>-2> 
<<U.1264-U.1311>-2> 

6648 

<<U.1284-U.1313>-2> 
<<U.1264-U.1314>-2> 

-28638 
<<SMGSSCOPY_CAP-U.1316>-4> 
<<COMMA=U.1317>=2> 

-28174 
<<SMGSSSAVE_TOKEN_STRING-U.1319>-4> 
<<U.1264-U.1320>-2> 

-32729 

<<SMGSS$SYNTAX_ERROR=-U. 1322>-4> 
-28179 
<<SMGSSSAVE_TOKEN_STRING“U.1324>-4> 
<<U.1264-U.1325>-2> 

5622 

-1 

0 

4191 

<<U.1329-U.1330>-2> 

5622 

-2 

0 

-28636 
<<INSERT_DOLLAR-U.1334>-4> 


= 
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sngs TRING_TABL beet tables for string capabilities 16-Sep-1984 AX-11 Bliss-32 V4.0-7 Page 57 
CONVERT_CONT ROL - fonvert “to control characte 14- 300-1382 94: #6; 22 SMGRTL.SRCJSMGSTRTAB. 4 2;1 (4) 
FFFF OO91C s THA TARGET 3 
U.1335: .WORD =] : ; 
905E OO91E AT} Mae 3 
U.1356: .WORD <-28578 : 3 
00000000V 00920 ; TPASACTION 3 
U.1337: .LONG <<INSERT_CARROT-U.1337>-4> ; ; 
FFFF 00924 ;TPA Nai : 
U.1338: .WORD -1 : ; 
9021 00926 p TERRI YPE 3 
U.1339: .WORD -28639 : 3 
00000000V 00928 ; TPASACTION 3 
U.1340: .LONG <<INSERT_EXCLAMATION-U.1340>-4> : 3 
FFFF Q092C ; TPASTARGET 3 
U.1341: .WORD <1 : 3 
9028 O092E ; TPASTYPE 3 
U.1342: .WORD -28632 : 5 
00000000V 00930 ; TPASACTION 3 
U.1343: LONG <<INSERT_PARENTHESIS=-U.1343>=4> : ; 
FFFF 00934 ; TPASTARGET ; 
U.1344: WORD -1 3 3 
15F6 00936 ; TPASTYPE 3 
U.1345: .WORD 5622 : 3 
FFFE 00938 ; TPASTARGET 3 
U.1346: .WORD <-2 : F 
0093A ; CARROT : 
U.1276: .BLKB 0 3 
105E OO93A ; TPASTYPE ; 
U.1347: .WORD 4190 3 : 
0000* 0093C ; TPASTARGET 3 
U.1349: .WORD <<U.1348-U.1349>-2> : 3 
15F6 OO93E ; TPASTYPE : 
U.1350: .WORD 5622 3 r 
FFFE 00940 ; TPASTARGET : 
U.1351: .WORD -2 Z : 
00942 ;CONTROL_CHAR ; 
U.1348: TBLK 0 3 
95ED 00942 ; TPASTYPE : 
U.1352: .WORD -27155 i 3 
00000000* 00944 ; TPASACTION 3 
U.1353: .LONG <<CONVERT_CONTROL-U.1353>-4> : 3 
FFFF 00948 ; TPASTARGET ; 
U.1354: .WORD -1 3 3 
0094A ;FAO grnee 3 
U.1280: .BLKB 0 | § 
8021 0094A pregerrre : 
0.1355: .WORD -32735 : ; 
00000000* 0094C ;TPASACTION 
U.1356: .LONG | <<SMGS$SAVE_TOKEN_STRING-U.1356>-4> ; 
15F6 00950 ; TPASTYPE 
U.1357: .WORD 5622 3 
FFFE 00952 pOQELARGE? 
U.1358: .WORD -2 : 
8055 00954 A Tegevre 
U.1359: .WORD -32683 3 
00000000* 00956 ; TPASACTION 
U.1360: .LONG <<SMGSS$SAVE_TOKEN_STRING-U.1360>-4> ; 
91F1 O095A ; TPASTYPE 


~13BG P4:F6:52 — FaMGAT Ob deg see We 05768. Page 7! 
: WORD =28175 : 


Dd 
or string capabilities 


PraRe TRING. TABL baat tables f 19- 
CONVERT_CONTROL = Convert “* to control characte 14- 


ab 
CO 


00000000v 0095¢ 


FFFE 
9S5ED 
00000000v 
FFFE 
FO4C 
00000000* 
00000000* 
FFFFFFFF 
FFFF 
91F1 
00000000v 
FFFE 
95ED 
00000000Vv 
FFFE 


9028 
00000000V 
0000+ 
11F2 
0000+ 
15F6 
FFFE 


19F8 
0000* 
FFFF 


00960 ; 
00962 ; 
00964 ;i 
00968 ; 
0096A ; 
0096C ;1 
00970 ; 
00974 ;1 
00978 ; 
0097A ;i 
0097¢ ; 
00980 ;T 
00982 ;1 
00984 ;1 
00988 ;T 
0098A ;A 
0098A ;1 
0098C ; 
00990 ;1 
00992 ; 
00994 ; 
00996 ;1 
00998 ; 
0099A ;A 
0099A ; 
0099¢ ;T 
0099 ;T 


<<INVALID_DIRECTIVE=U.1362>-4> 
-2 

-27155 
<<INVALID_DIRECTIVE-U.1365>=4> 
a 4 

-4020 
<<SMG$S$SAVE_TOKEN_STRING=U. 1368>-4> 
<<SMGSSMASK_ADR-U.1369>-4> 

-1 

-1 

-28175 
<<INVALID_DIRECTIVE-U.1373>-4> 
“2 

-27155 
<<INVALID_DIRECTIVE-U.1376>-4> 
-2 

0 

-28632 
<<INIT_ARITH_CAP-U.1379>-4> 
<<U.1380-U.1381>-2> 

4594 

<<U.1284-U.1383>-2> 

5622 

-2 

0 

6648 

<<U.1387-U.1388>-2> 

-1 


<<U.1387-U.1395>-2> 


SAGs TRING_TABL TPARSE tables for string capabilities 16-50 4 AXx-1 - -0- | 
1-00 CONVERT_CONTROL = = Convert aPto control characte 1 sets Pi 93: 6; aa ONGRTL SR eishesiataa 6 2;1 Spe (a) | 
15F6 OO9A0 ; Areas yvre 
.1 WORD 5622 : 
FFFE OO9A2 vipa TARGET 
U.1391: .WORD <2 3 
009A4 OP OR: 0 
7028 vedeeedl | 28715 
00000000« 009K6 | 
<<SMGSSMASK_ADR=-U.1393>=-4> 
FFFFFFFB QO9AA 5 
0000* OO9AE + 


7020 00980 : 
28717 : 

00000000* 00982 + : 
<<SMGSSMASK_ADR-U.1397>=4> | : 

FFFFFFFA 009B6 ; : | ; 
0000* O09BA ; : 
<<U.1387-U.1399>-2> F 

702A 009BC ; TY YP : 

0.1 28714 : 

00000000 009BE ;TPASAD DD ; 
1 <<SMGSS$MASK_ADR=-U.1401>-4> : 

FFFFFFF9 009C2 ;TPASMAS | : 
.1402: -7 : 

0000* 009C6 ;TPA$T : 
1403: <<U.1387-U.1403>-2> $ 

702F 009C8 ;TPA$T PE : 
.1404: 28719 : 

00000000* O09CA ; TPASA : 
.1405: <<SMGSS$MASK_ADR-U. 1405>-4> : 

FFFFFFF8 OO9CE ; TPA MASK A : 
0000* 00902 ; TPA$T : 
.1407: <<U.1387-U.1407>-2> : 

9029 00904 ; TPASTYP : 
1408: -28631 : 

00000000v 00906 ; TPASA : 
1409: <<END_ARITH_CAP=U.1409>=4> : 

FFFF OO9DA ; TPA$T : 
.1410: -1 | Py 

85ED 009DC ; TPASTYP : 
U.1411: .WORD -31251 : : 

00000000v 009DE ; TPASACTION : 
U.1412: .LONG <<EXPRESSION_ERROR-U.1412>-4> ; 3 

009E2 ; OPE RAND : 

U.1 87: -BLKB 0 | e 

91F3 OO9E2 ; TPASTYPE : 
U.1413: .WORD -28173 : : 

00000000v 009E4 Us PASACTION | : 
U.1414: .LONG <<STORE_OPERAND-U.1414>-4> ; : 

0000* 0098 UFPASTARGET | : 
U.1415: .WORD <<OPERATOR-U.1415>-2> : | : 

19F8 OO9EA ; TPASTYPE | : 


F 13 
SMGSSTRING_TABL TPARSE tables for string capabilities 16-Sep-1984 AX-11 Bliss-32 V4.0-74 
1-00 CONVERT_CONT ROL - Convert * to control characte 1 12-8ep- 138 9}: tf 22 SMGRTL.SR ReishestRi RB 89251 eee (B 
U.1416: .WORD 6648 é 
tevin MTS teen <U.1417"U.1418>-2 
° 3 ¢ <CU. -U. >-2> § 
0000* OO9EE p TORS LARGE 
B81F1 OO9FO ; TPASTYPE 
00000000V O09F2 ; TPASACTION 
U.1421: .LONG <<EXPRESSION_ERROR-U.1421>-4> ; 
B85ED OO9F6 ; TPASTYPE 
U.1422:_ ,WORD -31251 ; 
00000000V 009F8 ateesgetson 
U.1423: .LO <<EXPRESSION_ERROR=U. 1423>-4> : 
OO9FC ;SUBSTITUTION 
U.1417: .BLKB 0 
0025 OO9FC ; TPASTYPE 
U.1424: .WORD 37 : 
15F6 OOSFE ; TPASTYPE 
U.1425: .WORD 5622 3 
FFFE QOAOO ; TPASTARGET 
U.1426: .WORD <2 3 
91F3 OOA02 ; TPASTYPE 
U.1427: .WORD -28173 : 
00000000V O0A04 ; TPASACTION 
U.1428: .LONG <<STORE_SUBSTITUTION-U.1428>-4> 3 
FFFF QOAO8 ; TPASTARGET 
U.1429: .WORD -1 : 
85ED OOAOA ;TPASTYPE 
U.1430: .WORD -31251 é 
00000000V OOAOC ; TPASACTION 
U.1431: .LONG <<EXPRESSION_ERROR-U.1431>-4> é 


-PSECT _LIBSKEYO$,NOWRT, SHR, PIC,1 
00000 SHGSSA_STRING_KEYUDS:: 
00000 ; TPASKEYO 


U.1: . LKB 
0000* 00000 ; TPASKEY 
U.30: WORD <U.29-U.1> e 
0000* 00002 ;TPASKEY 
U.35: » WORD <U.34-U.1> Py 
0000* 00004 ; TPASKEY 
U.40: WORD <U.39-U.1> 3 
0000* 00006 ; TPASKEY 
U.45:  .WORD <U.44-U.1> 
0000* 00008 ; TPASKEY 
U.50: WORD <U.49-U.1> 
0000* OO00A ; TPASKEY 
U.56: «WORD <U.55-U.1> 
0000* OO000C ; TPASKEY 
U.65:  .WORD <U.64-U.1> 
0000* OOOOE ; TPASKEY 
U.72: «WORD <U.71-U.1> 
0000* 00010 ; TPASKEY 
U.79: WOR <U.78-U.1> 
0000* 00012 ; TPASKEY 


.WORD  <<OPERATOR=U. 1419>=2> ; 
| 


SMGSSTRING_TABL Het tables for string capabilities 
1-00 NVERT_CONT ROL - Convert * 


0000+ 
0000+ 
0000+ 
0000* 
0000+ 
0000* 
0000+ 
0000+ 
0000+ 
0000+ 
0000+ 
0000+ 
0000+ 
0000+ 
0000+ 
0000+ 
0000+ 
0000* 
0000* 
0000+ 
0000+ 
0000* 
0000+ 
0000+ 
0000+ 
0000+ 
0000+ 
0000* 


to control characte 1 


00014 
00016 
00018 
QO01A 
0001C 
QOO1E 
00020 
00022 
00024 
00026 
00028 
0002A 
0002C 
0002E 
00030 
00032 
00034 
00036 
00038 
0003A 
0003¢ 
0003€ 
00040 
00042 
00044 
00046 
00048 
0004A 


ifSeo-1986 01:22:55 


U.86: WORD 
; TPASKEY 
U.93: WORD 
; TPASKEY 
U.100: .WORD 
; TPASKEY 
U.107: . WORD 
3 TPASKEY 
U.114: . WORD 
3 TPASKEY 
U.121: . WORD 
MY) a 
U.128: WORD 
3 TPASKEY 
U.135: .WORD 
3; TPASKEY 
U.142: WORD 
3; TPASKEY 
U.149: . WORD 
3; TPASKEY 
U.156: .WORD 
; TPASKEY 
U.163: WORD 
; TPASKEY 
U.170: WORD 
3; TPASKEY 
U.177: WORD 
3; TPASKEY 
U.184: .WORD 
3; TPASKEY 
U.191: WORD 
; TPASKEY 
U.198: .WORD 
; TPASKEY 
U.205: .WORD 
; TPASKEY 
U.212: . WORD 
; TPASKEY 
U.219: WORD 
3 TPASKEY 
U.226: .WORD 
s TOASKEY 
U.233: .WORD 
ptonaney 
U.240: .WORD 
3 TPASKEY 
U.247: WORD 
3 TPASKEY 
U.254: .WORD 
3; TPASKEY 
U.261: . WORD 
; TPASKEY 
U.268: .WORD 
p opener 
U.275: . WORD 
; TPASKEY 
U.282: .WORD 


AX-11 B 
SMGRTL. 


<U.85-U.1> 

<U.92-U.1> 

<U.99-U.1> 

<U.106-U.1> 
<U.113-U.1> 
<U.120-U.1> 
<U.127-U.1> 
<U.134-U.1> 
<U.141-U.1> 
<U.148-U.1> 
<U.155-U.1> 
<U.162-U.1> 
<U.169-U.1> 
<U.176-U.1> 
<U.183-U.1> 
<U.190-U.1> 
<U.197-U.1> 
<U.204-U.1> 
<U.211-U.1> 
<U.218-U.1> 
<U.225-U.1> 
<U.232-U.1> 
<U.239-U.1> 
<U.246-U.1> 
<U.253-U.1> 
<U.260-U.1> 
<U.267-U.1> 
<U.274-U.1> 
<U.281-U.1> 


sre} 


-32 V4.0 
SMGST RIAB. if 2:1 
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Be Oe Oe Be Se Oe Be Se Oe Se Se Be FHS Se Se Se Ge Se Se Ge Se Fe Fe Se Ge Ge Se Se Se Se Se Se See Fe Se Se Se Se Se Se Se Fe Se Se ee ee ee Se SH Se Se Se ee esas 


TOGOg MING-TABL TONVERT CONTROL © Convert to control chawacte 1o- sep-196 93:76:de — EaNGa te SReSsmes Rtas 6$2, 1 we 
eles, <U.288-U.1> i 
nf <U.295-U.1> 
ee <U.302-U.1> 
ntelicommes, <U.309-U.1> 
saute statin ‘, <U.316-U.1> ; 
eet aad <U.323-U.1> 
setae enone <U.330-U.1> : 
nidiccssieed. <U.337-U.1> 
punchmeaiel § <U.344"U.1> : 
onc ianee i, <U.351-U.1> : 
ween eaapene i. <U.358-U.1> : 
ee ek. <U.365-U.?> } 
seid tmeapll <U.372-U.1> : 
ee <U.379-U.1> 
-seeihpacmme, <U.386-U.1> 
ate y gens, <U.393-U.1> : 
ren s <U.400-U.1> : 
— <U.407-U.1> 
asncboannt * <U.414-U.1> : 
cemcctivaacnal <U.421-U.1> : 
vamenciyasetce, <U.428-U.1> : 
Scene: Sore: <U.435-U.1> : 
wanna <U.442-U.1> 
wae we <U.449-U.1> : 
eeetieead <U.456-U.1> : 
eivmied <U.463-U.1> : 
ne sf <U.470-U.1> : 
ant Soeee i. <U.477-U.1> : 
0000* 00084 ; 


AX=11 Bliss-32 V4.0-74 
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SM 
RT_CONTROL = Convert “* to control characte 14-Sep-1 a 33 


U.485: WORD <U.484-U.1> : $ 
sn boas WORD <U.491-U.1 ; 
* : . . a” eo > é P 
aunt neeeed yal rr 
J : oO . a oo > $ P 
0000* 0008A {TEASKEY wee eens ; 3 
oe : ° . re . > P PY 
— siBagiey WORD U.512-U.1 ; 
7 = <U.512-U.1> : : 
Moot ee eeDee WORD <U.519-U.1 
* : o . on a > é Py 
hee ean gTggsKey WORD <U.526-U.1 
. : . . -U. > é Py 
on vee j ggeke” WORD U.533-U.1 
e t's <U. “U.1> 3 : 
pes pay é'Selee WORD U.540-U.1 ; 
° me” <u. “U.1> g ; 
0000* 00096 ; TPASKEY 3 
U.548: .WORD <U.547-U.1> : 3 
0000* 00098 ; TPASKEY 3 
U.555: . WORD <U.554-U.1> : é 
gaan argaskeY WORD U.561-U.1 ; 
e is <u. =U.1> 3 ; 
0000* 0009C ; TPASKEY 3 
U.569: .WORD <U.568-U.1> 3 é 
0000* OO09E ; TPASKEY 3 
U.576: .WORD <U.575-U.1> : ; 
0000* OOOAO ; TPASKEY 3 
U.583: .WORD <U.582-U.1> : § 
0000* OOOA2 ; TPASKEY 3 
U.590: .WORD <U.589-U.1> : 3 
0000* OO0A4 ; TPASKEY § 
U.597: .WORD <U.596-U.1> : 3 
0000* OO0A6 ; TPASKEY 3 
U.604: WOR <U.603-U.1> : F 
0000* OO0OA8 ; TPASKEY 3 
U.611: .WORD <U.610-U.1> ; 3 
0000* OOOAA ; TPASKEY : 
U.618: .WORD <U.617-U.1> $ g 
0000* OOOAC ; TPASKEY 3 
U.625: .WORD <U.624-U.1> ; 3 
0000* OOOAE ; TPASKEY $ 
U.632: .WORD <U.631-U.1> : b 
0000* 00080 p Te gaKey 3 
U.639: .WORD <U.638-U.1> 3 3 
0000* O00B2 ; TPASKEY 3 
U.646: .WORD <U.645-U.1> : $ 
0000* 00084 pregekey $ 
U.653: .WORD <U.652-U.1> é é 
0000* 000B6 ; TPASKEY 
U.660: .WORD <U.659-U.1> : 
0000* 00088 TOneKey 
U.667: .WORD <U.666-U.1> 3 
0000* OOOBA ; TPASKEY 
U.674: .WORD <U.673-U.1> 3 
0000* OOOBC ; TPASKEY 
U.681: .WORD <U.680-U.1> 3 


PARSE tables for string capabilities 
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0000+ 
0000* 
0000+ 
0000+ 
0000+ 
0000* 
0000* 
0000* 
0000* 
0000* 
0000* 
0600+ 
0000+ 
0000+ 
0000+ 
0000* 
0000+ 
0000+ 
0000* 
0000+ 
0000+ 
0000* 
0000+ 
0000+ 
0000+ 
0000+ 
0000+ 
0000+ 
0000+ 


own 
@eow 


OO0BE 
000Cc0 
000C2 
000C4 
000C6 
000C8 
QOOCA 
ooocc 
OO0CE 
00000 
000D2 
00004 
00006 
00008 
QO0DA 
0000C 
000DE 
000E0 


« 
VTNUN UN UN UN UN UN UN UNU PAP APA Ay D, 


ce 
—:. —te 


so =e. 


000E4 
000E6 
000E8 
QOOEA 
OO0EC 
OOOEE 


0O0FO ; 
U.863: 


000F2 ;TPASKEY 
6.870: 


000F4 ; TRASKEY 
U.877: 
OO00F6 ; TPASKEY 


pa19B¢ 13:46:04 


AX-1 
SMGR 
<U.687-U.1> 
<U.694-U.1> 
<U.701-U.1> 
<U.708-U.1> 
<U.715-U.1> 
<U.722-U.1> 
<U.729-U.1> 
<U.736-U.1> 
<U.743-U.1> 
<U.750-U.1> 
<U.757-U.1> 
<U.764-U.1> 
<U.771-U.1> 
<U.778-U.1> 
<U.785-U.1> 
<U.792-U.1> 
<U.799-U.1> 
<U.806-U.1> 
<U.813-U.1> 
<U.820-U.1> 
<U.827-U.1> 
<U.834-U.1> 
<U.841-U.1> 
<U.848-U.1> 
<U.855-U.1> 
<U.862-U.1> 
<U.869-U.1> 
<U.876-U.1> 


Oh lege V4.0- 
C 


1 74 P S 
TL. SRCJSMGSTRTAB.B52; 1 Ph B 
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U.884: .WORD <U.883-U.1> : : 
nana aan b1B9ts WORD <U.890-U.1> ; 
0000* OOOFA ; TPASKEY ’ ; 
U.898: ~ WORD <U.897-U.1> é Py 
0000* OOOFC ; TPASKEY F 
U.905: .WORD <U.904-U.1> : : 
0000* OOOFE ; TPASKEY ; 
0000* 00100 ; TPASKEY 3 
U.919: .WORD <U.918-U.1> : 3 
0000* 00102 ; TPASKEY 3 
U.926: .WORD <U.925-U.1> : ; 
0000* 00104 p TBASKEY $ 
U.933: .WORD <U.932-U.1> ; 3 
0000* 00106 ; TPASKEY 3 
U.940: .WORD  <U.939-U.1> : F 
0000* 00108 ; TPASKEY 3 
U.947: .WORD <U.946-U.1> : 3 
0000* O010A ; TPASKEY 3 
U.954: .WORD <U.953-U.1> : 3 
0000* 0010C ; TPASKEY 3 
U.961: .WORD <U.960-U.1> : 3 
0000* OO10E ; TPASKE 3 
U.968: .WORD <U.967-U.1> : é 
0000* 00110 ; TPASKEY 3 
U.975: .WORD <U.974-U.1> 3 3 
0000* 00112 ; TPASKEY 3 
U.982: .WORD <U.981-U.1> : 3 
0000* 00114 ; TPASKEY s 
U.989: .WORD <U.988-U.1> : F 
0000* 00116 ; TPASKEY 3 
U.996: .WORD <U.995-U.1> : 3 
0000* 00118 ; TPASKEY 3 
U.1003: .WORD <U.1002-U.1> 3 3 
0000* 0011A ; TPASKEY 3 
U.1010: .WORD <U.1009-U.1> 3 3 
0000* 0011C ; TPASKEY 3 
U.1017: .WORD <U.1016-U.1> : 3 
0000* OO11E ; TPASKEY 3 
U.1024: .WORD <U.1023-U.1> 3 : 
0000* 00120 ; TPASKEY 3 
U.1031: .WORD <U.1030-U.1> 3 : 
0000* 00122 j TRASKEY : 
U.1038: .WORD <U.1037-U.1> 3 F 
0000* 00124 ; TPASKEY 3 
U.1045: .WORD <U.1044-U.1> 3 3 
0000* 00126 ; TPASKEY 3 
U.1052: .WORD <U.1051-U.1> 3 3 
0000* 00128 ; TPASKEY 3 
U.1059: .WORD <U.1058-U.1> 3 3 
0000* 0012A ; TPASKEY 5 
U.1066: .WORD <U.1065-U.1> 3 3 
0000* 0012C p THASEEY 3 
U.1073: .WORD <U.1072-U.1> 3 ; 
0000* 0012E p TEABKEY F 
U.1080: .WORD <U.1079-U.1> : 3 


SMGSSTRING_TABL TPARSE ta 
1-00 CONVERT_C 


bles f 
ONTROL 


or string capabilities 
to control characte 1 


- Convert “* 


0000* 
0000+ 
0000+ 
0000* 
0000+ 
0000+ 
0000* 
0000* 
0000* 
0000* 
0000+ 
0000+ 
0000* 
0000* 
0000+ 
0000+ 
0000* 
0000+ 
0000* 


00130 ; 
00132 ; 
00134 
00136 
00138 ; 
ete 
0013¢ 
0013€ 
werd 
00142 
00146 
00146 ; 
wef 
OO14A ; 
ebted | 
OO14E : 
varied, | 
00152 ; 
COO 4 


ifcBeo-1984 01:22:55 


i toere 
10 » WORD 
Sti ts sues 


SRGRTLSRCSSMGSTRTAB 88251 row ofS 
<U.1086-U.1> ; 
<U.1093-U.1> : 
<U.1100-U.1> : 
<U.1107-U.1> : 
<U.1114-U.1> : 
<U.1121-U.1> 3 
<U.1128-U.1> : 
<U.1135-U.1> : 
<U.1142-U.1> : 
<U.1149-U.1> : 
<U.1156-U.1> ; 
<U.1163-U.1> : 
<U.1170-U.1> 3 
<U.1177-U.1> ; 
<U.1184-U.1> : 
<U.1191-U.1> : 
<U.1198-U.1> ; 
<U.1205-U.1> : 
<U.1212-U.1> : 
OTSSCVT_TI_L, SMGSSBLANKS_OFF 


SMGSSBLANKS “by SHGSSCOPY Y~CAP 
SMGSSELUSH_K RRI THM 
HSAVED- ME UTTER 


AACN, ORGS INVDIR 


S$ nist TERNAR 

SMG$ CINE AP, sacs YNERR 

SMGSSMASK i, * sSeSsRent _NEGATIVE_NUMBER 
SMGSSCURRENT LINE 

SMGSSDATA OFFSET 
_SMGSCODE ,NOWRT, 


SHR, PIC,2 


SAGSSTRING_TABL | 
1-00 


; Routine Size: Routine Base: 


PARSE tables for string capabilities 
CONVERT_CONTROL = Convert * 


2¢ 000000006 80 
48 AC 
000000006 


14 
40 


SOMO HNO——OVAS 


SOAROSCOWDOOO 


0 


to control characte 14- 
0004 00000 CONVERT_CONTROL: 
WORD 


9 
C 
D 


Mmvwrom 


o— 
wT 


_SMGSCODE + 0000 


or 


—s 
wr 
od 


OoooooooocKeo 


pe ee oieieieieiololololeilo) 
COVUMIM S NPM VJ MO 


WUWNTRONINMIN = =DO00 


1 USFGid2  FeMcat ObkessazsY Ries 7685.4 


Save R2 

SHGSSE LUSH. SAVED_BUFFER, R2 

*3tab) 

sMcs MISTERNAM 

aP6¢AP) CONTROL 
CONTR PT CHARS WOVE CHAR 

(aes SAGSSFCUSH SAVED_BUFFER 


nove CHAR. 
(ap ig SmGSSFLUSH. SAVED_BUFFER 


SMGSSTRING_TABL TPARSE tables for string capabilities aS -1984 5 AX-11 Bliss-32 V Page 68 

egos CONVERT_ESCAPE - Convert $ fo escape character =3ep-1986 rat 6; aa SMGRTL. BR C Shes YRina. 4} 2:1 . (3 

> 625 698 1 XSBITL "CONVERT_ESCAPE = Convert $ to escape character’ ; 
; 626 4 1 ROUTINE CONVERT_ESCAPE = 3 
; 627 0 1 : 
; 628 701 1 !44 F 
; 629 bre 1 ! FUNCTIONAL DESCRIPTION: F 
; 3 : $702 : St h ter in th bilit ing i } 
3 ‘ ores an escape character in the current capa string in ; 
: 63 0705 1 | TERMTABLE EXE.” seca Recs t, 
; 634 $709 1 ! CALLING SEQUENCE: 3 
; 635 Bo 08 1! 3 
; $36 709 1! status = CONVERT_ESCAPE () 3 
3; 6 0710 1! 3 
; 638 0711 1 =! FORMAL PARAMETERS: : 
; 639 arte . | : 
; 640 0715 1! NONE : 
> 641 0714 1! 

; 64 0715 1 ! IMPLICIT INPUTS: 

3; 64 0716 1! 

; 644 0717 1! AP Points to TPARSE parameter block 

3; 645 0718 1! 

> 646 0719 1 ! IMPLICIT OUTPUTS: 

; 647 0720 1! 

3; 648 0721 1! NONE 

; 649 07 ¢ 1! 

; 650 072 1 ! COMPLETIOM STATUS: 

; 651 0724 1! 

; 652 0725 1! SS$_NORMAL 

; 653 0726 1! 

3; 654 0727 1°! SIDE EFFECTS: 

3; 655 0728 1! 

; 656 Bree 1 fe- 

; 657 0730 1 

; 658 0731 BEGIN 

3; 659 Oras BUILTIN 

; 660 073 CALLG, 

; 661 0734 2 AP; 

3 906 0735 MAP 

: 66 te) AP : REF BLOCK C,BYTE]; 

3: 664 7 LITERAL 

3; 665 0738 K_ESCAPE = %X‘1B'; 

3; 666 B? 9 BIND 

; 667 740 CAP_PTRS = .AP CPARAM_L_CUR_TERM_DEF] : VECTOR C.WORD); 

: 668 153 

3; 669 reg + . 

; on tie s The NAME capability should have preceeded this. Complain if it didn't. 

: 67 byes | 

: 67 0746 IF CAP_PTRS EQL 0 

: 674 Be TH | 

3; 675 748 SIGNAL_STOP (SMG$_MISTERNAM) ; 

; 676 749 

3; 677 750 '¢ i 

; 678 751 ! Move an escape character into the capability string instead of | 

3 4 P36 ' the $. 

: 681 0754 ! Part of the string may already be copied - append in this part so 


Sheps TRING, TABL heat 4: tables for ae gapent teres IbSe “Sep p- 138% 9}: ee 32 AX-11 BLi atis LS EY 


ONVERT_ESCAPE = Conver to escape character -Sep-1 SMGRTLe SR TRTAB.B32;1 
: 68 755 ' as not to overwrite it. 
; OB 7 8 !< 
> 684 7 
; 685 758 CALLG (.AP, SMGSS$FLUSH_SAVED_BUFFER); 
: 68 0759 
: 68 0760 1+ 
; 688 0761 ! Insert the escape character. 
; «689 BF 6 te 
; 690 076 
: 691 0764 AP CPARAM_L_SAVED_TOKENCNT] = 
; 69 0765 AP [PARAM” we “SAVED_ _TOKENSTR) = béuit (BYTE (K ~ESCAPE)); 
; 69 8508 ! escape now "saved' 
H o3e 4524 CALLG (.AP, SMGS$SFLUSH_SAVED_BUFFER); 
; 696 0769 RETURN (SS$_NORMAL); 
; 697 0770 
; 698 0771 1 END; ! end of routine CONVERT_ESCAPE 


-BLKB 3 
P.AAA: .BYTE 


0004 00000 venetceition Sy 


ORD Save R2 
52 000000006 00 9€ 00002 MOVAB  SMGS$$FLUSH_SAVED_BUFFER, R2 
48 AC 05 00009 TL  72¢AP) 
OD 12 9000¢ Fo ~Cts«é1S 
000000006 00 9F 0000E PUSHAB SMG$_MISTERNAM 
000000006 00 01 FB 00014 CALLS #1, CIBS$STOP 
62 6C FA 0001B 1$ CALLG (AP) SMGSSFLUSH_ SAVED_BUFFER 
54 OAC 01 pO 0001 MOVL #1, 84(AP 
58 OAC DA AF 9E 0002 MOV P. AAA, BBCA 
62 6C FA 000 CALLG (AP), SMGSSF LUSH. SAVED_BUFFER 
50 01 DO 0002A MOVL #1, RO 
04 00020 RET 


; Routine Size: 46 bytes, Routine Base: _SMGSCODE + 003D 


Sete Se Se Se Se Be Be Se Se Se Be 


a ee ee ee 


ee eee ee ee ee ee ee ee ee ee ee ee ee ee ee ee ee ee ee ee ee ee ee ee ee ee ee ee 


a a A a = Nig 
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1-00 EXPRESSION_ERROR = Signal and expression error 14-Sep-1984 13:10:04 SMGRTL.SRCJSMGSTRIAB.B52;1 (6) 
; 700 ire 1 ZSBITL "EXPRESSION_ERROR = Signal and expression error’ ’ 
; 701 775 1 ROUTINE EXPRESSION_ERROR = : 
; ie 774 «4 : 
; 7 0775 1 I++ ‘ 
> 704 gre 1 | FUNCTIONAL DESCRIPTION: ; 
; 705 Grr 3 4 ; 
; 706 bree 1 | Signal that an invalid arithmetic expression was found. ‘ 
3; «for Gnak : 
; 708 144! 1 ! CALLING SEQUENCE: ; 
; 709 0781 1! : 
s £19 14-04 1 } ‘ 
; fi] 7 = status = EXPRESSION_ERROR () ; 
: i§ 784 1'! : 
ae 4 0785 1 ! FORMAL PARAMETERS: ° 
; 714 0786 1! ; 
; 12 0787 1! NONE 
; 716 0788 1! 
3 ie 0789 1! IMPLICIT INPUTS: 
3; ris 0790 1! 
3; 719 0791 1! AP Points to TPARSE parameter hlock 
; reo 145 a 
: fey 0795 1 ! IMPLICIT OUTPUTS: 
; ose 0794 1! 
3 fe 0795 1! NONE 
; 724 0796 1! 
s fee 0797 1 ! COMPLETION STATUS: 
; 726 0796 1! 
3 fer 0799 1! SS$_NORMAL 
; 728 0800 1! 
; 44 0801 1 ! SIDE EFFECTS: 
; 730 tt 1! 
: 75) 0805 1 !-- 
: ers 0804 1 
: 0805 2 BEGIN 
; 734 0806 § BUILTIN 
:. t39 0807 AP; 
; 736 0808 2 MAP 
3 for 0809 § AP : REF BLOCK C,BYTE); 
; I 0810 
3; 739 0811 § SIGNAL_STOP (SMG$_ERRAT_LIN, 
; 740 08 § 3, .SMGSSCORRENT_LINE, 
; 08 -AP CTPASL_TOKENCNTI, 
; 0814 -AP_CTPASL_TOKENPTRI, 
: 8 H SMG$_INVEXP) 
; 817 1 END; ! end of routine EXPRESSION_ERROR 


0000 00000 EXPRESSION_ERROR: 


«WORD Save nothing : 0773 

ote 00 9F 008 BUSHAB mcs INVEXP ; 81 

000000006 ? DD ¢ PUSHL  SMGS$CURRENT_LINE : HE 
DD 0001 PUSHL #3 : 081 


14 
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in 633 ae sh PRESTON. ERROR : =*Sfongt ona expression error ia-Sep 21384 94:46:82 SMGRTL” SR Reis SmeSYRTAB BS2:1 . (6) 
000000006 Oe fp oF 14 PUSHAB snes ERRAT_LIN : 
000000006 00 6 1A CALLS , CIBSSTOP 3 
21 RET ; 0817 


; Routine Size: 34 bytes, Routine Base: _SMGSCODE + 0068 


Oooo 


SSNS OO 
nm 
2.09 CD 09 00 09 CD 09 CD 09 09 09 CD CD CD CD CD CO CD CDCR OD CD 


DUP SSISIUIVIVIVIT LE IS 


NANA 


o 
WN OODONOUSWN-O0OO~ 


SMGSSTRING_TABL END TAR tabl 
1-0 ARITH_C 


RoPOPOPOPOPONOPOPOPONOPIPIPIPOPINOPOPOPIPDYD 2 
. 


es 

3! End of ar 
TTL 

Tl 


+ 
Indicate end of computing. 


j ° . 
of string capabilities | | TB-Sep-1964 01:27:55 yanett Bs 


"END ~ARITH. CAP = End of arithmetic capability data’ 
NE END-ARITH_CAP = 


14 
' FUNCTIONAL DESCRIPTION: 


We have found the end of an arithmetic expression (a right 
arenthesis). An arithmetic expression should be terminated 
y the encoded type SMGSK_STORE, indicating that the final 

value has been computed. 


i CALLING SEQUENCE: 


status = END_ARITH_CAP () 


i FORMAL PARAMETERS: 


NONE 


i IMPLICIT INPUTS: 


AP Points to TPARSE parameter block 


i IMPLICIT OUTPUTS: 


NONE 


i COMPLETION STATUS: 


SS$_NORMAL 


i SIDE EFFECTS: 


BEGIN 
BUILTIN 
CAL 


° 
7 
e 


P : REF BLOCK [,BYTE); 


MAP 


AP CPARAM_L_SAVED_TOKENCNT) = 1; 
AP [PARAM_L-SAVED_TOKENSTR) = UPLIT (BYTE (SMG$K_STORE)); 


CALLG (.AP, SMGSSFLUSH_ARITHMETIC); 
' move the data 


AP CTPASV_BLANKS] = 1; ! Look at blanks again 
RETURN (SS$_NORMAL); 


7 
e 
. 
o 
. 
. 
. 
. 
. 
° 
7 
. 
© 
o 
o 
° 
oO 
2 
. 
* 
. 
, 
. 
e 
. 
o 
. 
* 


i aaa ra a i I TL BIT a aa i Ta ae erate i — a 
» 
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th END_ARITH_CAP = End of a it sett capability da 132800- 1386 9354800 SMGRTL.SRCJSMGSTRTAB. is 2:1 os (7) 
; 804 0875 1 END; ! end of routine END_ARITH_CAP 


i+ -BLKB 3 
F7 00090 P.AAB: .BYTE 


0000 00000 END_ARITH ae 


.90 Save nothing ; 0819 

4 at 01 pO 90002 MOVL #1, 84(AP) : 0865 

8 AC F6 AF 9E 00006 MOVAB P.AAB, 88(AP) : 866 
000000006 00 6C FA 90008 CALL (AP), SMGS$FLUSH_ARITHMETIC > 086 
04 AC 01 88 0001 BISB2 #1, 4(AP) : 0871 

50 01 DO 00016 MOVL #1, RO + 0873 

04 00019 RET + 0875 


; Routine Size: 26 bytes, Routine Base: _SMGS$CODE + 0091 


. 
° 
o 
° 
. 
o 
. 
’ 
. 
° 
o 
° 
. 
. 
. 
eo 
. 
° 
. 
. 
. 
o 
* 
. 
© 
. 
a 
. 
° 
7 
o 
os 
. 
. 
e 
. 
° 
o 
e 
. 
. 
. 
. 
7 
° 
. 
° 
. 
o 
. 
e 
. 
° 
. 
e 
. 
* 
. 
. 
o 
. 
e 
. 
a 
. 
e 
. 
. 
. 
o 
o 
o 
o 
- 
e 
© 
e 
. 
o 
o 
e 
. 
e 
. 
e 
. 
o 
. 
° 


| 
~~ 
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tii INIT_ARITH_CAP = lnitiatize erithnetic capabili 1 ~300 7138 94:98:32 SMGRTL SREISHESYRIAB 692; 1 . (8) 
3; § 76 1 ZSBTTL "INIT_ARITH_CAP = Initialize arithmetic capability data' 
: 80 F¢ 1} ROUTINE INITCARITHCEAP = : , 
; 808 4: 1 
$ £98 79 1 {44 
; 5\9 age } } FUNCTIONAL DESCRIPTION: 
: Big ¢ 1! We have found the beginning of an arithmetic expression (a left 
; #8) at 1! parenthesis). Before moving operands and operators ‘nto the data 
; 814 ape 1! area, initialize it as an arithmetic gepeb) ity jie. .tart with a 
; 819 0885 | negative length and a type of SMGSK_ARITH_STRING. 
; aif O88? 1 ! CALLING SEQUENCE: 
; 818 886 1! 
; 819 0889 1! status = INIT_ARITH_CAP () 
; 820 0890 1! 
H Bs) 0891 1 ! FORMAL PARAMETERS: 
; 8 ¢ 494 1! 
3 S2 0893 1! NONE 
> 824 0894 1! 
; 825 0895 1! IMPLICIT INPUTS: 
> 826 0896 1! 
3 6Ger 0897 1! AP Points to TPARSE parameter block 
; 828 0898 1! 
: 829 0899 1! IMPLICIT OUTPUTS: 
; 830 0900 1! 
; 831 0901 1! NONE 
; S36 0902 1! 
; 8 090 1 ! COMPLETION STATUS: 
; 834 0904 1! 
; 835 0905 1! SS$_NORMAL 
3; 836 0906 1! 
; 837 0907 1 ! SIDE EFFECTS: 
; 838 0908 1! 
; SP 0909 1 !-- 
; 840 0910 1 
> «841 0911 2 BEGIN 
; Bee Bolg 2 
; 684 0913 2 BUILTIN 
3; 844 0914 CALLG, 
; 6845 0915 : 
; 846 0916 MAP 
3; 847 0917 2 AP : REF BLOCK C,BYTE); 
; 848 0918 
: $68 3484 LOCAL 
; 850 920 FIRST : INITIAL (0), ! flag to indicate start of string 
; 851 0921 START_CAP_STRING; ! where to copy data 
3 S26 09 ¢ MAP 
; 833 i ; START_CAP_STRING : REF VECTOR C,BYTE,SIGNED); 
; 855 925 BIND 
; 837 3 $ CAP_PTRS = .AP CPARAM_L_CUR_TERM_DEF] : VECTOR C,WORD]; 
; 858 03 8 2 !+ 
; 859 929 !' The NAME capability should have preceeded any arithmetic capability. 
3 0 930 ' Complain if it didn't. 
3; 861 931 !- 
; 862 932 


H 14 
SPGSSTRING_ TABL INIT art? sble es for string capabilities 19 Sep- 1384 04:46 :3) aneat, © i : shastatre e 892.1 


NIT H_CAP = Initialize arithmetic capabili 1 ~Sep- 
: 4 2 ? en PTRS EQL 0 ; 
: 865 935 SIGNAL_STOP (SMG$_MISTERNAM); ; 
: Be 0987 
: 868 938 we may have copied some normal text before we encountered an $ 
; 869 939 i arithmetic expression. Find the start of the string, and make : 
; 870 940 _sure that there isn't some more saved text. : 
mo Be | 
; e78 as 3 CALLG (.AP, SMGS$FLUSH_SAVED_BUFFER); : 
: B75 0945 IF .CAP_PTRS C.AP CPARAM_L_CUR_CAP_NUMBER]) NEQ 0 : 
: 876 98 THEN : 
A Be reer : 
; 443 ba} . Not start of the capability string. ; 
: 881 0951 START_CAP_STRING = .AP CPARAM_L_CUR_TERM_DEF] + : 
; 88 O26 3 -CAP_PTRS C.AP CPARAM_L_CUR_CAP_NUMBERJ]; 3 
; 88 0953 3 END $ 
we BBE Be, : 
; 886 0956 i First byte of capability string. Set offset pointer. : 
; 887 0957 Hed 3 
. oe: se : 
: 890 0960 3 START CAP’ STRING = -AP CPARAM_L_CUR_DATA BYTE; : 
; «891 0961 3 CAP_PTRS [.AP [PARAM L_CUR_CAP_RUMBER iJ, . SMGSSDATA OFFSET; $ 
; 89 0962 3 SMGSSDATA_OFFSET = .SMGSSDATA "OFFSET : 
; 89 0963 3 ' ie, space for at least size, type : 
; 894 0964 3 ! bytes i 
; 895 0965 END; 3 
; 896 0966 : 
BE Hearst : 
; 99 0969 AP CPARAM_L_CUR_DATA -BYTE] = -AP CPARAM_L_CUR_DATA_BYTE] + 2; é 
: 900 0970 ! space for size & type byfes ; 
mM BA b. : 
: 90 $993 i If some other things Higery. this arithmetic expression, we need 3 
: ape bape & to move them over bytes to make room for a size and type. : 
: 9 976 "IF _NOT .FIRST ; 
; 90 97 THEN 3 
; 908 978 BEGIN ! not first byte in capability : 
ese ate’ : 
: gi! 3 1 TYPE = .START_CAP_STRING C1];  ! make this a longword : 
; 318 3 § IF TYPE NEQ SMGSK_ARITH_ STRING ; 
: Bi? , 5 ? BEGIN ! first expression : 
; 319 9 5 4 ve don't allow mixing of FAO strings and arithmetic 3 
: 918 9 3 4 i Sesreewtens. We know the type isn’t arithmetic, so 3 
; 919 09 4 ! if the length is negative, there must be an FAO string. : 
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tit INIT_ARITH_C CAP - initiotize erithmet ic capabili 12: ae 138 9y: 46; 32 YOMGR MGRTL.SR ReismestRTAB. Ago, 31 . (8) 
; 920 990 4 Ho | ; 
ae 74] 991 4 IF_.START_CAP_STRING (CO) LSS 0 : 
3 9 § 992 4 THEN , 
3; § 9935 4 SIGNAL _STOP sae ERRAT_LIN, ; 
> 924 994 4 SSCORRENT_LINE, ; 
3 Yeo 995 4 AP PARAR L SAVED TOKENCWT2, ; 
; 9 § o338 4 PARAM-L_SAVED_TOKENSTRJ, ‘ 
; > 997 & SnGs. SYNERR) > ; 
; 928 B338 4 ; 
; 929 999 4 '+ : 
5 4 » 1399 ? \. Slide over text. ; 
; $30 1308 4 CHSMOVE (. pi CAP_STRING [0] + 2, ! # chars + size, type bytes > 
; ¥ 1003 4 T_CAP_STRING , i from old location ; 
; 934 1004 4 START CAP-STRING C235; i to new 
3 ¥se 1005 4 
; 936 1006 4 + 
2 937 1007 4 ' Need a negative size. The size includes the data, 
3 oes 1306 ? the size byte and the type byte. 
; 940 1010 4 i Note that right now, the size of the normal text is the size of 
> 941 1011 4 : _the entire capability string. 
: ne Isi¢ 4 ! 
; 94 101 4 if -START_CAP_STRING CO] GTR 0 
> 944 1014 4 
: 945 1015 4 START_CAP_STRING [0] = START _CAP_STRING [0] =- 4; 
: ace 1918 ? ! size’+ 2°size & type bytes 
; 948 1018 4 AP CPARAM_L_CUR_DATA_BYTE) = ao tegen L_CUR_DATA_BYTE] + 2; 
; 949 1019 4 uodet ¢ next “free byte 
; 950 1020 4 SMGSSDATA_OFFSET = .SHGSSDATA 0 FSET ¢ 
3; 9) 1021 4 '“update next offset 
3 226 1oe¢ 3 END; ! first expression 
; 196 ; 
3 954 1024 END ! not first byte in capability 
; 955 1025 2 LSE 
: 956 1056 START_CAP_STRING [OJ = .START CAP. STRING (0) - 2; 
; 957 10 '“include size & type bytes for 
; 958 1028 ' arith in count 
3 Yo? 1O6p 
; 960 1030 
: 961 1031 START_CAP_ STRING C1) = SMGSK_ARITH_ STRING <0,8>; 
; 308 1036 ' set (or reset) as arith string 
; aac 1034 AP CTPASV_BLANKS) = 0; ! ignore blanks between ( ) 
; 966 1038 RETURN (SS$_NORMAL) ; 
; Por 103 s 
; 968 1038 1 END; ! end of routine INIT_ARITH_CAP 


NIT_ARITH_CAP: 
Fre eee et et 5 ave R2,R3,R4,R5,R6,R7,R8 : 0877 
58 000000006 00 9€ 00002 MOVAB eTBest TOP, RB ; 


SMGSSTRING_TABL TPARSE tables for string capabiliti 
ti INIT_ARITH ie] d t 


1 
CAP = Initialize arithmetic capabili 1 
57 000000006 9E 0000 
B8 be 9001 
52 48 A 8 } 
000000006 00 9F 1 
8 1 FB if 
000000006 00 C FA 
0 50 AC D 028 
6240 8B 02C 
OA 1 O2F 
56 6240 3C 00031 
56 48 AC 9 B88 3 
OE 11 
53 01 DO 00038 
56 4C Ag DO 000 § 
6240 6 8° 0004 
67 9¢ CO 00046 
07 E9 Babe? 
4C AC 0¢ co 8 4C 
4A 53 €8 00050 
50 01 A6 98 po Res 
FFFFFFFE 8F 50 D1 0005 
40 13 44643 
66 95 0006 
1B 18 00062 
000000006 00 9F 00064 
7E AC 7D 0006A 
00000000G 00 OD O0006E 
03 Dd 00074 
000000006 00 9F 00076 
68 06 FB aport 
50 66 98 0007F 
50 02 CO it 
02 A6 66 50 $e BR08 
66 95 OOO8A 
06 15 0008C 
66 66 8E O008E 
66 04 82 00091 
4C AC 02 CO 00094 
67 02 CO 00098 
03 11 00098 
66 BS 82 444 
01 A6 02 8€ QOOA0 
04 AC 01 8A Benag 
50 01 DO Q00A8 
04 OO0AB 


; Routine Size: 172 bytes, Routine Base: _SMGSCODE + OOAB 
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wn 
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o 
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co 
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1986 93:46:06 


ee Bliss-32 V4.0-74 
SMGRTL.SRCJSMGSTRTAB.B52; 1 


SMGSSDATA_OFFSET, R7 
FIRST 

72(AP), R2 
SMGS$_MISTERNAM 

#1, CIBSSTOP 


SMGSSFLUSH_SAVED_BUFFER 


ao 
7 


0], START_CAP_STRING 
» START_CAP_STRING 


>~ ->~ 
unm UMS mero. 
eee ~> zm 


ON DHDOY 
» 
79 
a4 


NBN om 


(AP), START_CAP_ 
SMGSSDATA, OFFSET 
#2, SMGSSBATA_OFFS 


IRsI 4$ 

#2, 7ACAP) 

FIRST, 7$ 
1(START_CAP_STRING), TYPE 
iYPE. #=2 
(START_CAP_STRING) 
SMG$_SYNERR 
84(AP), =(SP) 
SMGSSCURRENT_LINE 
SMG$_ERRAT_LIN 

#6 


(START_CAP_STRING), RO 
#2, RO 


nn 


; (START_CAP_STRING), 2(START_CAP_STRING) 


RO 
(START _CAP_STRING) 


(START_CAP_STRING), (START_CAP_STRING) 
#4, (START CAP_STRING) 


76( 
#2. SMGSSDATA_OFFSET 


#2, (START_CAP_STRING) 
#2. 1(START_CAP_STRING) 
4 (AP) 


See Se Se Ge Se Se Se Ge Se Se Be Ge Fe Ge Ge Be Se Se Se Fe Se Se Fe Fe Fe Fe Fe Ge Ge Ge Ge Se Se Be Se Se Ge Ge Ge Be Be Be Be Be Se 


Be Be Se Se Be Be Oe Se Se Ge Ge Se Ge Fe Se Se Se Ge Ge Se Ge Se Ge Ge Ge Se Ge Ge Ge Se Se Se Fe Ge Se Ge Se Se Se Se Se Se Se Se Se Se Se Se eee, HSH SH Se Se eses 
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1-00 INSERT_CARROT = Insert : = A the capability st 12-86-16 4 93:98:82 SMGRTL.SRCISMGSTRTAB.B 2:1 . (9) 
; 970 1 23 1 ZSBITL "INSERT CARROT = Insert a “ in the capability string’ ; 
3; or 1040 1 ROUTINE INSERT_CARROT = ; 
3 ars 1041 1 : 
3 O77 1 rk 1 !+4 ; 
; 974 1045 1 ! FUNCTIONAL DESCRIPTION: ; 
: ote 1008 1 i St haracter in th t capability string : 
: : ores a “ character in the current capa string in , 
; 977 1906 1! TERMTABLE.EXE. , : . : 
: 978 1047 1! ‘ 
3; ory 1048 1 ! CALLING SEQUENCE: : 
; 980 1049 1! ; 
; 981 1929 1! status = INSERT_CARROT () 
: Hy 1051 1! 
; 98 1928 1 ! FORMAL PARAMETERS: 
>; 984 1055 1! 
; 985 1054 1! NONE 
; 986 1055 1! 
3 «9G 1056 1 ! IMPLICIT INPUTS: 
; 988 1057 1! 
; 989 1058 1! AP Points to TPARSE parameter block 
: 990 1059 1! 
; 991 1060 1 ! IMPLICIT OUTPUTS: 
3; WW 1061 1! 
; 99 1906 1! NONE 
3: 994 1063 1! 
s 995 1064 1 ! COMPLETION STATUS: 
; 996 1065 1! 
; 997 1066 1! SS$_NORMAL 
; 998 1067 1! 
; .999 1068 1 ! SIDE EFFECTS: 
; 1000 1069 1! 
; 1001 1070 1 !-- 
; 1008 1071 1 
3; 100 1976 BEGIN 
3 1004 107 
: 1005 1074 BUILTIN 
3; 1006 1075 CALLG, 
3; 1007 1076 H 
; 1008 1077 MAP 
; 1009 1078 AP : REF BLOCK C,BYTE); 
; 1010 1079 
3; 1011 1080 ed F 
; 1012 1081 ! If this is not the NAME capability and we have no pointers set up 
: 1013 1086 ! for the terminal definition, then NAME was not the first capability 
3; 1014 108 ! in the definition. Complain. 
3; 1015 1084 l- 
3; 1016 1085 
3 1017 1988 BEGIN 
; 1018 108 BIND 
: 4 1938 CAP_PTRS = .AP CPARAM_L_CUR_TERM_DEF] : VECTOR C,WORDJ; 
: 1021 1090 IF CAP_PTRS EQL 0 
3 10e¢ 199) THEN 
3; 10 1 36 SIGNAL_STOP (SMG$_MISTERNAM) ; 
3: 1024 193 
; 1025 1094 '¢ : , é 
3; 1026 1095 ! Move the capability data. The byte count is in the first byte and 


ce ca ee ed ee ce ee a ee ee ee et ee cd 
yk 


Sr 
VIFWN—"OOONOUS WN —O0OO~ 


; Routine Size: 


SPGS STRING. TABL Hert 


037 


1 
1 
109 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 


See ee ee 
3 | “OOO DOOOCOCOCOOO 


FW" OVOENAOUE WO OM 


52 00000000G 00 9€ 00002 MOVAB 
48 AC 05 00009 TSTL 
OD 12 Boone BNEQ 
00000000G 00 9F OOODE PUSHAB 
000000006 00 01 FB 00014 CALLS 
62 6C FA 0001B 1$: CALLG 
54 AC 01 D0 OOO1E MOVL 
58 AC D7 =OAF OSE BO Oss MOVAB 
62 6C FA 0002 CALLG 
50 01 00 Q002A MOVL 
04 0002D RET 
46 bytes, Routine Base: _SMGSCODE + 015C 


— 


; _ERRKS a gepabilities 1be8e p-1984 t 91: + 33 AX-11 BLi pees ae e¥hs 0-74 


n the capability st 1228 08-138e 
! the actual data follows. 


SMGRTL.SR 


' Part of the eruritentt. olre be copied - append in this part so 


! 
' as not to overwri 
4 part of the sequence.) 


CALLG (.AP, SMGSSFLUSH_SAVED BUFFER); 


T , saved string 
AP CPARAM_L_SAVED_TOKENCNT 
AP CPARAM_LISAVED_TOKENSTR] = = UbLIT ("4"); 
rrot is now ‘saved’ 
CALLG (.AP, SMGSSFLUSH_ SAVED: “ BUFFER); 


can happen if escape or control are 


END; ! end of BINDs scope 


RETURN (SS$_NORMAL); 


END; ! end of routine INSERT_CARROT 


0015 
00 00 00 SE 0015 


0004 00000 INSERT_CARROT: 
WORD 


7 -BLKB 
8 P.AAC: .ASCII 


1 
\*\<0><0><0> 


Save R2 
SMGS$SFLUSH_SAVED_BUFFER, R2 
72(AP) 


1$ 
SMG$_MISTERNAM 
#1, CIBSSTOP 
(AP), SMGSS$FLUSH_SAVED_BUFFER 
#1, 84CAP) 

P.AAC, 88(AP) 

(AP), SMGSSFLUSH_SAVED_BUFFER 


RTAB.B52;1 


Sete Se Se Se Be He Se Be Se Be Se 


M14 
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reeo8 INSERT_DOLLAR = Insert : $ Rnto a capability st 13-808-1 382 93:98 ib SMGRTL.SRCJSMGSTRTAB 882; 9 169 

: 1047 1115 1 ZSBTTL "INSERT_DOLLAR = Insert a $ into a capability string’ 

; 1048 1118 1 ROUTINE INSERT_DOLLAR = 

; 1049 1117 1 

; 1050 1333 1 !44 

; B24 1138 : FUNCTIONAL DESCRIPTION: 

; 1988 1121 1! Stores a $ character in the current capability string in 

; 1054 11 § 1! TERMTABLE.EXE. 

; 1055 11 a 

; 1928 1124 1 ! CALLING SEQUENCE: 

; 105 1125 1! 

; 1038 11 : 1! status = INSERT_DOLLAR () 

; 105 11 1! 

: 1060 1128 1 ! FORMAL PARAMETERS: 

: 1061 1129 1! 

3 1006 1130 1! NONE 

3; 106 1131 1! 

> 1064 11 § 1 ! IMPLICIT INPUTS: 

; 1065 11 a. 

: 1066 1134 1! AP Points to TPARSE parameter block 

3 1067 1135 1! 

3: 1068 1138 1 ! IMPLICIT OUTPUTS: 

3; 1069 1137 1! 

; 1070 1138 1! NONE 

: 1071 1139 1! 

H 1076 1140 1 ! COMPLETION STATUS: 

: 107 1141 1! 

3 1074 1148 1! SS$_NORMAL 

; 1075 1143 1! 

3; 1076 1144 1 ! SIDE EFFECTS: 

3: 1077 1145 1! 

; 1078 1146 1 !<- 

; 1079 1147 1 

; 1080 1148 § BEGIN 

; 1081 1149 

3 1Oe6 1150 BUILTIN 

: 108 1151 CALLG, 

3: 1084 1136 3 

: 1085 115 

3; 1086 1154 AP : REF BLOCK C,BYTE); 

: 1087 1155 BIND 

3 1088 1156 CAP_PTRS = .AP CPARAM_L_CUR_TERM_DEF] : VECTOR C,WORD); 

3; 1089 1157 

3; 1090 1138 '¢ 

3; 1091 115 : If this is not the NAME capability and we have no pointers set up 

3 1038 1160 ! for the terminal definition, then NAME was not the first capability | 

3; 109 1161 ! in the definition. Complain. 

3: 1094 1196 t= 

3; 1095 116 

; 10 1164 IF CAP_PTRS EQL 0 

3 94 1165 N 

3; 1098 1166 SIGNAL_STOP (SMG$_MISTERNAM) ; 

3; 1099 116 | 

3; 1100 1168 + > y 

3 1101 119% ! Move the gegen i tity data. The byte count is in the first byte and 

: 1196 1170 ! the actual data follows. 

3 110 1171 ! | 
| 
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e808 INSERT_DOLLAR = Insert : $ Rato a capability st 1 ~8ep-19 4 94:98:32 SMGRTL. SRCISMGSTRTAB.B ast ’ 18) 

: 1104 117 ! Part of the string may already be copied - append in this part so 

; 1105 1138 ! as not to overurite it. (This can happen sT escese or control are 

3 11 1174 ' part of the sequence.) 

; 110 1175 te 

3: 1108 1128 

WU d str 

3 T copy saved strin 

P44 1179 AP CPARAM_L_SAVED_TOKENCNT] = 13") : 

; 111g 1180 AP CPARAM_L~SAVED-TOKENSTRJ = UPLIT ('$'); 

3111 1181 ! Ss now ‘saved’ ; 
3 1114 11 ; CALLG (.AP, SMGSSFLUSH_SAVED_BUFFER); ; 
We HB Esneed ; 
31117 1185 RETURN (SS$_NORMAL); ; 
: 1118 1186 ; 
; 1119 1187 1 END; ! end of routine INSERT_DOLLAR : 


0018A -BLKB 2 
00 00 00 24 0018C P.AAD: .ASCII \$\<0><0><0> 3 


0004 00000 INSERT_DOLLAR: 
WORD 


2 Save R2 : 1116 3 
52 000000006 00 9€ 00002 MOVAB SMGS$SFLUSH_SAVED_BUFFER, R2 : ; 
48 AC D5 00009 TSTL 72(AP) > 1164 ; 
0D 12 0000C NEQ 1$ ; ; 
000000006 00 9F 0000E PUSHAB SMG$_MISTERNAM + 1166 ; 
000000006 00 01 FB 00014 CALLS #1, CIB$STOP : : 
2 6C FA 0001B 1$ CALLG (AP), SMGS$FLUSH_SAVED_BUFFER : 1177 ; 
54 AC 01 DO 0001 MOVL #1, 84(AP) : 1179 
58 AC D7 AF 9E 0002 MOVAB P.AAD, 88(AP) + 1180 
62 6C FA 0002 CALLG (AP), SMGS$FLUSH_SAVED_BUFFER : 1182 
50 01 DO 0002A MOVL #1, RO : 1185 
04 0002D RET > 1187 


CALLG (.AP, SMGSSFLUSH_ SAVED BUFFER); 
; Routine Size: 46 bytes, Routine Base: _SMGSCODE + 0190 


SS senses nesses ~smmnnnnnmestanen-nenene ——$___—— 


15 
pabilities 16-Sep-1984 a TEE AX-1 


1 Bliss-32 V4.0-74 © 
a! into a capabili 14-Sep-1 SMGRTL. aeishgstntas 6S2:1 age 486 


zv 


De xo 
-- oe 


AMATION = Insert a ! into a capability string' 
AMATION = 


o 
FUNCTIONAL DESCRIPTION: 


Stores a ! character in the current capability string in 
TERMTABLE.EXE. 


CALLING SEQUENCE: 
status = INSERT_EXCLAMATION () 
FORMAL PARAMETERS: 
NONE 
IMPLICIT INPUTS: 
AP Points to TPARSE parameter block 
IMPLICIT OUTPUTS: 
NONE 
COMPLETION STATUS: 
$S$_NORMAL 
SIDE EFFECTS: 


on 


einpAP ¢ REF BLOCK C BYTE); 
CAP_PTRS = .AP CPARAM_L_CUR_TERM_DEF] : VECTOR C,WORD]; 


14 
! If this is not the NAME capability and we have no pointers set up 

! for the terminal definition, then NAME was not the first capability 
in the definition. Complain. 


IF CAP_PTRS EQL 0 
SIGNAL_STOP (SMG$_MISTERNAM) ; 
'¢ 


! Move the capability data. The byte count is in the first byte and 
the actual data follows. 


ee ee ee ce el el el ee ere el ee eee ee cel ee ee ee el el eel ee ee ee ee ce ee ce el el el ce cel el el ee el tel el cel cel cl el el el eel el elt ee c+ el eel el eel cel ae 
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i Part of the string may already be copied - append in this part so 


caneal 
‘=z 
Ss 


a ss a ss i 
SS SS tS SS 


OOO CoCo CUCU CD CD CB COCO ~~ 
NM —OVWONOULSWN—OOO 


; Routine Size: 


les for string capabilities 16-50 p-1984 AX-11 Bliss-32 V4.0 
LAMATION = Insert a! into a capabili =3eP | 198e 9}: 96; 32 SMGRTL.SRCISMGSTRTA 
! as not to overwrite it. (This can happen if escape or control are 
;_part of the sequence.) 
CALLG (.AP, SMGSSFLUSH_SAVED BUFFER); 

T opy saved buffer 
AP [PARAM_L_SAVED_TOKENCNT) = 
AP CPARAM_LISAVED_TOKENSTRI = UPLIT ('!"); 

exclamation. is now ‘saved’ 

CALLG (.AP, SMGSSFLUSH_ SAVED: BUFFER); 

T append. 
RETURN (SS$_NORMAL) ; 


END; ! end of routine INSERT_EXCLAMATION 


001BE -BLKB 2 
00 00 00 21 QO1CO P.AAE: .ASCII \!\<0><0><0> 


0004 00000 INSERT en tere 


Save R2 
52 000000006 00 9€ 00002 MOVAB SMOSSFLUSH. SAVED_BUFFER, R2 
48 AC 05 00009 TSTL 72(A 
0D 12 0000C BNE 
000000006 00 9F 0000E PUSHAB SMG$_MISTERNAM 
000000006 09 01 FB 00014 CALLS #1, CIBS$STOP 
6 6C FA 0001B 1$ CALLG (AP), SMGS$FLUSH_SAVED_BUFFER 
54 AC 01 DO 0001 MOVL #1, B4¢AP) 
58 OAC D7 AF 9E 000 MOVAB P.AAE, 88(AP) 
$2 6C FA 000 CALLG (AP), SMGSSFLUSH_SAVED_BUFFER 
5 07 DO 0002A MOVL #1, RO 
04 00020 RET 


Routine Base: _SMGSCODE + 01C4 


82:1 


*32 V4.0-74 
SMGSTRTAB. 


ee i ise 
SMGRTL.SARC 


5 
4 


—__——$—$ 


15 
ep- 1984 15:16:0 
Insert a ( into a capability string’ 


D 
16 
14 


r string capabilities 


les fo 
ENTHESIS = Insert a ( into a capabili 


tab 
PAR 


SE 
INSERT_ 


TABL TPAR 


STRING, 


SMGS 
1-00 


: VECTOR C,WORDJ; 


current capability string in 
» then NAME was not the first capability 


n 
Complain. 


Points to TPARSE parameter block 
ows. 


s a ( character in the 
IMPLICIT OUTPUTS: 


e 
TABLE EXE . 


° 
R 
CALLING SEQUENCE: 
: REF BLOCK C,BYTE); 


CAP_PTRS = .AP CPARAM_L_CUR_TERM_DEF J 


c= 


-PTRS EQL 0 
SIGNAL_STOP (SMG$_MISTERNAM) ; 


SS$_NORMAL 


status = INSERT_PARENTHESIS () 
SIDE EFFECTS: 
N 


FORMAL PARAMETERS: 
AP 


IF CAP 
Part of the string may already be copied - append in this part so 


Move the pagent tity cote. The byte count is in the first byte and 


If this is not the NAME capability and we have no pointers set up 
the actual data fo 


for the terminal definitio 


T 

T 
FUNCTIONAL DESCRIPTION: 
in the definition. 


NONE 
IMPLICIT INPUTS: 

AP 

NONE 
COMPLETION STATUS: 


De OPT MNDOP. DHOOM UM TIN OR. DWP OO MUM TIN OR. DHOOM ATM OR. DHOOM MUMTNOR. DOO MUM TNO 
DOOD 0D 000 0OR RRR RARRAR AR DDDDDDDODDORAAPAOAOAOOOOCOOOOSCOCOr Hee ee 
ROIS OAS OS OS OI OS OI OS OI OI OS OS OI OI OI OI OI OS OS OS OI OI OS OS OI OI OI OI OI OI OI OI OS OI OSI OI PPP PLD PT PD PFD PD PD PD POD PD PD DD 


LLL LLL LLL LLL LLL LLL LLC LCOS 


LLL LLL LLL LL LL LL LLL LLC ELC LLL LOL LL EK SK 


ld Re Med Det Re ee ed te ee eh ee dh dh eh a nd a a a a a a a a dt et Od ee ed Od ek ee ee Oe Oe ee Oe Oe ed ee ee Oe 


SAGSSTRING, TABL 
1-00 


not to overwrite it. (This can happen if escape or control are 
rt of the sequence.) 


T opy saved string 
PARAM_L_SAVED_TOKENCNT 
PARAM_L—SAVED-TOKENSTR = UPLIT ('("); 

is now saved 
CALLG (.AP, SMGSSFLUSH_ SAVED. BUFFER); 
Tt append ( 


RETURN (SS$_NORMAL) ; 


if CALLG (.AP, SMGSSFLUSH_SAVED BUFFER); 
1 END; ! end of routine INSERT_PARENTHESIS 


a SS 4 a Ss ds 


rororer 


IIS 
MEW —OODONOUS wr 


AAAS 


-BLKB 2 
00 00 00 28 P.AAF: .ASCII \(\<0><0><0> 


0004 00000 INSERT her Aaa ll 


.W Save R2 
52 000000006 00 H 00002 MOVAB SMOSSFLUSH_ SAVED_BUFFER, R2 
48 AC D 90009 TSTL 72¢A 
0D 12 0000C BNEQ 
000000006 00 9F 9000E PUSHAB SMG$_MISTERNAM 
000000006 00 01 FB 00014 CALLS #1 STOP 
62 6C FA 0001B 1$ CALLG (AP) SMG$SFLUSH_SAVED_BUF FER 
54 AC 07 DO 0001 MOVL #1, 84(AP) 
58 AC D7 AF 9E 000 MOVAB P.AAF, BB CA AP) 
62 6C FA 900 CALLG (AP), SMGS$FLUSH_SAVED_BUFFER 
50 01 DO 0002A MOVL #1, RO 
04 00020 RET 
; Routine Size: 46 bytes, Routine Base: _SMGSCODE + 01F8 


es for string capabilities 16-50 -1984 AX-11 Bliss-32 V4.0=-74 
NTHESIS = indert’ 2 ( into a capabili 238-1884 oy: 96; 3 SMGRTL.SR ROIS nes\Rine 6 2;1 
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F 15 
1°, bhatt te TPARSE tables for string capabilities 16-Sep-1984 046838? AX-11 of 4 PS Vesta as 
1-00 INVALID_DIRECTIVE = signal invalid directive er 14-Sep-1984 13:10:04 SMGRTL.SRCJSMGSTRTAB.B352;1 
: 1267 1 ¢ 1 XSBITL_"INVALID_DIRECTIVE = signal invalid directive error’ 
>; 1268 1 1 ROUTINE INVALID_DIRECTIVE = 
3; 7 4 1334 1 
; 1270 1335 1 !+4 
; } | : $ } FUNCTIONAL DESCRIPTION: 
3; 7 o bh ae Following a !, we have found some directive we don't handle. 
: 1274 13539 1! Signal an error. 
; 1275 1340 1! 
; 1276 1341 1 ! CALLING SEQUENCE: 
: 1277 1 rf 1! 
; 1278 1345 1! 
3; 1279 1344 1! status = INVALID_DIRECTIVE () 
; 1280 1345 1! 
; 1281 1346 1 ! FORMAL PARAMETERS: 
H see 1347 1! 
3; 128 1348 1! NONE 
H \s8e 1349 1! 
; 1285 1350 1 ! IMPLICIT INPUTS: 
> 1286 1771 35 
; 1287 1326 : 2 AP Points to TPARSE parameter block 
: 1588 1355 1! 
3; 1289 1354 1! IMPLICIT OUTPUTS: 
; 1290 1555 1! 
3; 1291 1356 1! NONE 
: 1636 b> a ie 
3; 129 1328 1 ! COMPLETION STATUS: 
3; 1294 1559 1! 
; 1295 1360 1! SS$_NORMAL 
3; 1296 1361 1! 
3 1297 1306 1 ! SIDE EFFECTS: 
3; 1298 1565 1! 
: 9.4 1364 1 !-- 
3; 1300 1365 1 
; 1301 1366 2 BEGIN 
; 1308 1367 2 BUILTIN 
3; 130 1368 AP; 
3 1304 1369 MAP 
; 1305 1370 AP : REF BLOCK C,BYTE); 
; 1306 1371 
3; 1307 1376 SIGNAL_STOP (SMG$_ERRAT_LIN, 
; 1308 137 ,_»SMGSSCORRENT_LINE, 
; 1309 1374 -AP CTPASL_TOKENCNTI, 
3; 1310 1322 -AP_CTPASL_TOKENPTRI, 
3 igi] 1376 SMG$_INVDIR) ‘ 
3; 1312 1377 1 END; ! end of routine INVALID_DIRECTIVE 


0000 00000 INVALID_DIRECTIVE: 
000000006 00 9F 000 pigana sate TacpiR 
19, AC 7 008 Ge OBtAP ote) 
000000006 06 D> 9900¢ PUSHL  SMGSSCURRENT LINE 
DD 1 PUSHL #3 


~~ 
NNW 
PRIWE PW 


SHGBSTRING.TABL TPARSE tables for string capabilitie 18-50 “1 AX-11 Bliss-32 V 2 ? 

7-00 INVALID DIRECTIVE = "signal tnualid directive er 1eegepe198d $4:50:0, Namen etde ssa yRe ts 685.4 age 4% 
000000006 9F 00014 PUSHAB SMG$_ERRAT_LIN , 

000000006 00 88 Pe FB GootA CALLS) #6, CIBSSTOP on 


; Routine Size: 34 bytes, Routine Base: _SMGSCODE + a 


H 15 
SMGSSTRING_TABL TPARSE tables for string capabilities 16-Sep-1984 01:22:35 AX-11 Bliss-32 V4.0-74 P 
ti STORE_OPERAND = Store arithmetic operand 12280871384 3:46:00 SMGRTL  SREISMESTRINB-B 9251 age 25 


LOCAL 
COPY_BUFFER : VECTOR C7,BYTEJ; ! construct bytes to copy here 


AP CPARAM_L_SAVED_TOKENCNT] = 6; ! Longword + type,size bytes 
COPY_BUFFER 0} SMG$K_OPERAND<0,8>; ! type 
COPY BUFFER (1 : 


CHSMOVE (4, AP CTPASL_NUMBER], COPY_BUFFER [2]); 
! store binary operand 


eal ah ah ah had 


WR —OOONOUS Wh 


Ann 


'¢ 
: If this is the second operand, then we need to store an operator. 


IF .SMGSSMASK_ADR NEQ 0 
THEN 


; 1314 1 8 1 ZSBTTL_ "STORE_OPERAND = Store arithmetic operand’ : 
: 1319 1379 1 ROUTINE STORE-OPERAND = ; 
: 4 i$ 1 1 '44 : 
i 1318 138¢ 1 | FUNCTIONAL DESCRIPTION: ; 
: 1320 1 Bs 1/ We have just found an operand which we need to store in TERMTABLE. ‘ 
3; 1321 1385 1! We will also check to see if an operator was previously found and ° 
; 3 1386 1! needs to be stored. 3 
3; 3 1387 1! 3 
3; 1324 1388 1 ! CALLING SEQUENCE: : 
: 1358 1390 1 | 
; f 31 ; status = STORE_OPERAND () ; 
: ! ; 38 FORMAL PARAMETERS: ; 
; 1 He ; NONE : 
: i 97 ! IMPLICIT INPUTS: 
: 1335 1399 : AP Points to TPARSE parameter block ; 
: 1337 1401 3 | IMPLICIT OUTPUTS: 
ee te sp ee : 
: 134] 1405 1 | COMPLETION STATUS: ; 
; 1348 1407 SS$_NORMAL : 
> 1345 1409 1 | SIDE EFFECTS: : 
> 1346 1410 1} ; 
3: 1347 1411 1 !e< $ 
: 1808 1218 2 BEGIN ; 
: 1350 1414 BUILTIN : 
; i 1415 CALLG, 3 
13 1419 ra : 
> 13 1418 AP : REF BLOCK C,BYTE); ; 
3% 1419 ; 
3 1 1420 3 
.3 1421 s 
s 1 14 § 3 
3 1 14 : 
3 7 1424 : 
3 1 1425 : 
| 14 § 3 
3 1 14 : 
31 1428 3 
.y 1429 : 
3 1 1430 : 
3 3 1431 3 
> % 14 § 3 
3 1 14 : 
3 1 1434 : 


WWWIWIWoRonononononononoht 2 3 3 2 


Ww 
owe w 


15 
TRING_TABL TPARSE tables for string capabilities 16- -Sep- AX-11 Bliss-32 V4.0- Pa 89 
i STORE_OPERAND = Store arithmetic operand 14- Sep- 198 9: 96; 32 SMGRTL.SR Reishes TRIAS B B32;1 9° 44) 
: 1371 1435 BEGIN 
31 i 14 6 COPY BUFFER [6] = - SUGSSMASK ADR; 
; | 3 \4 AP CPARAR_ L_SAVED_TOKENCNT AP CPARAM_L_SAVED_TOKENCNT] + 1; | 
: 1375 14 
; 1 6 1440 AP CPARAM_L_SAVED_TOKENSTR] = COPY_BUFFER; 
; 8 144¢ CALLG (.AP, SMGSS$FLUSH_ARITHMETIC); ! write the buffer 
; 80 1444 SMGSSMASK_ADR = 0; ! re-init operator 
[4 8g 1446 RETURN (SS$_NORMAL); 
71 144 
; 1384 1448 1 END; ! end of routine STORE_OPERAND 


0004 00000 oe 


<WORD Save R2 : 1379 

52 000000006 00 9E 00002 MOVAB SHOSSHASK _ADR, R2 : 

5E 08 C2 00009 SUBL2 : 
54 «AC 06 DO 0000¢ MOVL + 1422 
6E FD 8F 98 00010 MOVZBW ii *tePy FFER + 1424 
02. AE 1€ AC DO 00014 MOVL (AP), COPY” BUFFER+2 : 1426 
50 62 00 90019 MOVL SHGSSMASK _ADR, + 1433 

07 13 0001C BEQL : 
06 «AE 50 90 OO01E MOVE RD. copy _BUFFER+6 : 1436 
54 AC D6 00028 INCL  84(AP) + 1437 
58 AC 6E 9E 00025 1$: MOVAB COPY_BUFFER, 88(AP) + 1440 
000000006 00 6C FA 9009 CALLG (AP)> SMGS$FLUSH_ARITHMETIC : 1442 
62 D4 00030 CLRL § SMGS$$MASK_ADR + 1444 
50 01 DO 00032 MOVL #1, RO + 1446 
04 00035 RET + 1448 


; Routine Size: 54 bytes, Routine Base: _SMGSCODE + 0248 


ae 


SIDE EFFECTS: 


BEGIN 

BUILTIN 
CALLG, 
AP; 


MAP 
AP : REF BLOCK C,BYTE); 
LOCAL 
COPY_BUFFER : VECTOR (3,BYTEJ; 


COPY_BUFFER 0} = 
COPY_BUFFER [1] = .AP CTPASL_NUMBER); 

' store decimal argument number as a byte 
AP CPARAM_L_SAVED_TOKENCNT] = 2; 


es eere hs 
MEWN OOO NOAUE WN O OONAOUES WN SO OONOUS WN 


SMGSK_SUBSTITUTE <0,8>; 


J 15 
SMGSSTRING_TABL TPARSE tables for string capabilitie 16-Sep-1984 01:22:35 AX-11 Bliss-32 V4.0-74 
at STORE_SUBSTITUTION - store Substitution flag in 12-88-1382 94:98:32 SMGRTL.SRC Shes YRine 69251 Page 39 
4 ZSBITL "STORE_SUBSTITUTION = store substitution flag in arithmeti ' 
By ROUTINE STORE“SUBSTITUTION = $ ° soma Pigs 
89 144 
30 | FUNCTIONAL DESCRIPTION: 
9 i Store an encoded flag indicating that a user argument must be 
7 2 } substituted into the expression at run-time. 
95 5 i CALLING SEQUENCE: 
3 20 1 i 
98 6 status = STORE_SUBSTITUTION () 
6 ; FORMAL PARAMETERS: 
6 NONE 
6 ! IMPLICIT INPUTS: 
5 AP Points to TPARSE parameter block 
g | IMPLICIT OUTPUTS: 
, NONE 
i COMPLETION STATUS: 
z SS$_NORMAL 
7 i 
8 i 
8 in 
8 
a 
8 
8 
8 
= 
8 
8 
9 
9 
9 
9 
9 
9 


'¢ 
: See if there's a saved operator that needs to be inserted. 


ono 


IF .SMGSSMASK_ADR NEQ 0 
THEN 


DINU OPOPOPOPOPOPONOPONNOPONINPUNOPONPIDIDY 
° 


ooooo 
SRAVLSSSVFARIANS LSSRNSARANW AS SHNONH IIS OOo aH AP ome oo O00 ern oe 4 


Be Be Se Se Se Se Se Se Se Ge Ge Se Ge Fe Se Ge Se Ge Ge Se Se Se Ge Ge Ge Ge Ge Ge Ge Ge Ge Ge Ge Ge Ge Ge Ge Ss Ge Ge Ge Se Se Se Se Se Se Sse eres Sete Sse Sseesese 
ee ee ee a cee ee ee ee ee ee ee ee ee cee ee ee ee ee ee ee a ee ee ce ce ce a ee ce ee a De a ee ee ee ed ee ee ed 
BREE RE RR PR REPRE REE EPP ERER REESE R EPR EERE 

ee ee ie i ee ee ee ee ee ee ee ee ee ee eee 
eee eee ee Se oe Se Oe oe OP Oe oe oe oe oe oP oe oP oe oe ot ot ot ot ot ot ot oe ot oe oe oe ae et ee ee ee ee aaa Ts 


AP CPARAM_L_SAVED_TOKENCNT) = .AP CPARAM_L_SAVED_TOKENCNT) + 1; 


BEGIN 
COPY BUFFER [2] = .SMGSSMASK_ADR; 
j 


SMGSSTRING_TABL TPARSE tables for string capabilitie 16-5¢ Sep-1984 5 AX-11 Oi Teg -32 V4.0-74 P 1 
arso8 STORE SUBSTITUTION © Store substitution flag in Ikesepel9Re $o.i0.0,  Venante sheSshes}atee 32-1 age 42) 
5 1443 1 $ SMGSSMASK_ADR = 0; 

a = 

; 1446 1308 AP CPARAM_L_SAVED_TOKENSTR] = COPY_BUFFER; 

> 1448 1311 CALLG (.AP, SMGSSFLUSH_ARITHMETIC); 

: 1338 121¢ ! move buffer to data area 

3 1431 1314 RETURN (SS$_NORMAL); 

: 1488 1516 1 END; ! end of routine STORE_SUBSTITUTION 


0004 00000 STORE ange peda mal 


RD R2 : 1450 

52 000000006 00 9€ 00002 MOV SMGSSMASK _ADR, R2 ; 

5E 04 C2 00009 SUBL P : 
6E 04 Hi 0000¢ MNEGR «#4. copy FER : 1492 
01 AE 1¢ AC 96 0000F MOVB 28(AP got _BUFFER+1 + 149 
54 AC 08 DO 00014 MOVL = #2, + 1495 
50 6 00 00018 MOVL SAGSSMASK. “ADR, RO + 1501 

09 13 0001B BEQL ; 
02 AE 50 90 0001D MOVB RO, COPY_BUFFER+2 + 1504 
54 AC D6 00021 INCL  84(AP) : 1505 
62 D4 00024 CLRL § SMGSS$MASK ADR, : 1506 
58 AC 6E 9E 00026 1S: MOVAB COPY sBUFFER AP) : 1509 
000000006 00 6C FA 000¢A CALLG (AP)* See SStLOsn ARITHMETIC + 1511 
50 01 D0 00031 MOVL #1, RO : 1514 
04 00034 RET : 1516 


; Routine Size: 53 bytes, Routine Base: _SMGSCODE + 027E 


15 
SMGSSTRING_TABL TPARSE tables for string capabilities 16-Se 1984 01:22:35 AX-11 Blis 
wtih NOT_STRING = signal an unknown capbility name 12280871382 93:98 :ba SMGRTL.SRC 
1 SBTTL "NOT_STRING = signal a k ilit ‘ 
WAS 
le 
! FUNCTIONAL DESCRIPTION: 
2 We just found a unknown nam ptt lye: name. It could be a misspelling 
2 or it could be a name misplaced under the wrong heading. Signal an 
3 i CALLING SEQUENCE: 


status = NOT_STRING () 
i FORMAL PARAMETERS: 

NONE 
i IMPLICIT INPUTS: 

AP Points to TPARSE parameter block 
i IMPLICIT OUTPUTS: 

NONE 
i COMPLETION STATUS: 

SS$_NORMAL 

i SIDE EFFECTS: 


bk ak ek etek ek eet al al ae al a te al tet a et ee ee 
SINS NSN NNSA A AAA AAOOUMNIIN 
WN“ ODONAUS WN" ODONOUS WH -"OVOONOUW 


F 
N 
1 
R 
1 
1 
' 
1 
' 
error. 
1 
! 
' 
' 
' 
! 
! 
' 
i] 
' 
' 
' 
1 
' 
' 
t 
1 
1 
1 
' 
' 
1! 
1 
1 


BEGIN 
BUILTIN 
AP; 
MAP 
AP : REF BLOCK C,BYTE); 


SIGNAL_STOP (SMG$_ERRAT LIN, 
3, .SMGSSCORRENT_LINE, 
~AP pIpAst .TOKENCHT ’ 
-AP_CTPASL_TOKENPTRI, 
SMG$_NOTSTRCAP) : 
END; ! end of routine NOT_STRING 


a el td dd 
OOOOOOOOOWBWMOWC 
SSSLESRANLESELERE 


WITS NN ee 
cc ce ee ee ce ee ce ee ec ce ee ee ee ee cD ce ee et ce ce ce ce ce el ee ee ee ee ed ed eed ed 


PUPP PUPUPUPUSU SUPP SUSU SUSU SUSI 


fe rot eae ate al eal al al ahah ah sh sl sl et et ee ee et et oP ot lt ee eee ie 
WN 9 OONAUEWN $9 ODNOUE WN 0 OONOAU EWN (OO CONOUS WN O0OO~ 


DEITY at at st a nh kd dh td od td 


o 
—_ 


0000 00000 NOT_sTRING: 


-WORD Sa 
000000006 00 or 608 ‘ PUSHAB SM 
7E 1 AC 7D 000 MOVa 16 

000000006 00 odd 0000C PUSHL SM 


M15 
2808 “INS-TM8l NOT" STRING = slgnal ‘an 'dnknown capoitity nane 1eqSepni9ee P4:f6s04 LaMont. sae isnestRtAS 8S2: 1 Page 3) 
000000006 09 BF oie PUSKAS SHGS_ERRAT LIN Peg 
000000006 00 6 FB OOOIA CALLS #6, CIBSSTOP 
04 00021 RET ; 1563 


; Routine Size: 34 bytes, Routine Base: _SMGSCODE + 0283 


; 1502 1564 1 !<BLF/PAGE> 


>a 
i 


N 15 
tables for string capabilities 16-Sep-1984 AX-11 Bliss-32 V4.0-7 P 4 
STRING = signal an ahenean capbility name 10-Sep-1984 rate 48: a SMGRTL.SRCJSMGSTRTAB. 3 2;1 age 45) 
5 } END ! End of module SMGSSTRING_TABLES 
§§ 0 ELUDOM 


-EXTRN LIBSSTOP 
PSECT SUMMARY 
Name Bytes Attributes 


_LIBSKEYO 342 NOVEC,NOWRT, RD, EXE, SHR, LCL, REL, CON, PIC,ALIGN(1) 
_LIBSSTATES 2576 NOVEC,NOWRT, RD, EXE, SHR, LCL, REL, CON, PIC,ALIGN(1) 
_LIBSKEY1 2061 NOVEC,NOWRT, RD, EXE, SHR, LCL, REL, CON, PIC,ALIGN(1) 
_SMGSCODE 725 NOVEC,NOWRT, RD, EXE, SHR, LCL, REL, CON, PIC,ALIGN(2) 

: Library Statistics 

SRM © Ga 2 eee ee Symbols -------- Pages Processing 

: File Total Loaded Percent Mapped Time 

: _$255$DUA28: CSYSLIBISTARLET.L32;1 9776 172 1 581 00:01.0 

3; =$255$DUA 8: SMGRTL.OBJIJRTLLIB.L32;1 36 0 8 00:00.1 

; _$255$DUA28:CSMGRTL.OBJJSMGLIB.L32;1 469 0 0 38 00:00.4 

: =$255$DUA28:CSMGRTL.OBJJSMGTPALIB.L32;1 

3 41 14 34 10 00:00.1 

: ~$255$DUA28:CSYSLIBJTPAMAC.L32;1 42 30 71 14 00:00.1 

3 COMMAND QUALIFIERS 

3 PLISS/CHECK= (FIELD. JMET IAL OPTIMIZE) /NOTRACE/L ISL ISS: SHGSTRTAB/OBJ20B.)S: SAGSTRTAS MSRC$: SMGSTRTAB/UPDATE=(ENHS: SMGSTRTAB 


Bize: 694 
un Time 


of° 5010 data bytes 
pty Times 10: 

13 

p 


fe + 

| 

Lines/CPU Min: 

Jey Ak 1 

ponaey Used: 758 
a 


d 
:4 
5 
1 
4 
Compilation Complet . 


e 
8. 
1. 
1 
0 
es 


4 
3 
a 
e 
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